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MEMORANDUM TO: Users of 1401 Tape to Card Utility Program 

SUBJECT: 1401 Tape to Card Utility Program, #1401-UT-028, 

Version 1, Modification Level 2 



This letter announces the availability of Version 1, Modification Level 2 
of the 1401 Tape to Card Utility Program, #1401-UT-.028. This modification, 
which is in the form of one patch card as well as a corrected listing, 
corrects all reported errors in the subject system. The patch card, 
enclosed, listed, and identified below (attachment #1) is to be inserted 
in the system deck as follows: 



Remove Card (cc 78-80) 
029 



And replace with card (cc 77-80) 
C 029 



This patch corrects a loop encountered when punching ten or more cards 
per record. 

The following corrections should be made to the library documentation: 



Location 

Page 8, paragraph 2a 

Page 8, paragraph 2b 

Page 8, paragraph 2e 

Page 8, paragraph 2f 

Page 8, paragraph E, line 9 

Page 9, Example #1, number 4 

under Given 
Page 9, Example #1, paragraph 

B under Procedure 
Page 9, Example #2, number 4 

under Given 



Chancre 

I-address is 1469 
I-address is 1502 
I-address is 1879 
I-address is 1846 
instruction address 1366 

columns 1-8 

card columns 1-8 

columns 1-20 
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"We appreciate your cooperation in making these changes. A list of the 
material distributed with this letter follows: 

Item No. Contents 

1 One patch card 

2 System listing of version 1, Modification 

Level 2 

3 Listing of patch card 

Initial requests for this system, which we filled after the release of this 
letter, will not include the card itemized above as the system deck will 
already reflect these changes. 

The Optional Program Material, available upon request, consists of the 
source symbolic program deck for Version 1, Modification Level 1. 

An Authorized Programming Analysis Report (APAR) should be submitted 
through the IBM Systems Engineer to report any difficulties encountered in 
the use of this system. 

Any discrepancy between the material you receive and the items listed 
above should be directed to the attention of the Manager of tha Program 
Information Department, IBM, 112 East Post Road, White Plains, New York. 
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, 008015,022029,056063/05602 9 ,0240671056 
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10 


2 970 






B 


KOOTST- 


12 


2 980 




SEQ2 


MCW 


FLOMOVG 


6 


2 990 






MCW 


HOLD - 


7 


3 000 






MCW 


HOLD - 


4 


3 010 






MCW 


HOLD - 


4 


3 020 






A 


HOLD - 


10 


3 030 






MCW 


LDCTR 




3 040 






MCW 


LDCTR 




3 050 






MCW 


TWO 




3 060 






B 


MOOTST- 


12 


3 070 




SEQ3 


MCW 


FLDMOV& 


6 


3 080 






MCW 


THREE 




3 090 






MCW 


HOLD - 


7 


3 100 






MCW 


HOLD - 


4 


3 110 






MCW 


HOLD - 


4 


3 120 






A 


HOLD - 


10 


3 140 






MCW 


LDCTR 




3 150 






B 


MODTST- 


12 


3 160 




CSQERR 


MCW 


SELCON 




3 170 






W 






3 180 






cs 


0280 




3 190 






sw 


0201 




3 200 






H 


• - 


3 


3 210 




LDCTR 


DCW 






3 220 




LCSELT 


DSA 






3 230 


17 


SELCON 


OCW 






3 240 


2 


CDSQNO 


OCW 






3 250 


2 




DCW 






3 260 


2 




DCW 






3 270 


3 




OCW 






3 280 


3 




OCW 






3 290 


4 


HOLD 


DCW 






3 300 


2 


19 


DCW 






3 310 


2 


FLDCNT 


DCW 






3 320 


3 


ADCNTR 


DCW 






3 330 


3 


LTHCTR 


DCW 






3 340 


4 


MPCTST 


DCW 






3 350 


3 


BRFIX 


DSA 






3 360 






ORG 


0333 




3 370 


4 


FLDSEQ 


NOP 


ERESTR 




3 380 


7 


SEQFLD 


MCW 


SQFLOl 




3 390 


7 


SEQMOV 


MCW 


0000- 




3 400 


I 




MCW 






3 410 


1 




MCW 






3 420 


1 




MCW 






3 430 


I 




MCW 






3 440 


/ 




A 


ONEBO - 


2 


3 450 


7 




C 


ZZZERO 





B OPERAND 

LDREAD& 10 
LDCTR 

SQFL02 

L0READ& 18 

C0»tf40V& 18 

LDREAD& 14 
LDCTR 

HOLD - 10 

LDREAD& 21 

CLSQWH& 21 

SQFLD3 
CLSQWM& 21 
LORE AD & 29 
LDREADC 25 
CONHOVe 22 
LDCTR 
LORE ADC 32 

0280 



FLOS EL 

FLO CD NO SEQ ERR 



LOC 



INSTRUCTION COMMENTS 



0196 



FIXTST 



SEQHOV& 3 
TEST 



SEQCNT 
RCOUNT 



3789 


M 


167 


559 


3796 


H 


167 


141 


3803 


B 


F50 




3807 


M 


E28 


Q53 


3814 


M 


170 


567 


3821 


H 


173 


W64 


3828 


M 


173 


563 


3835 


A 


167 


141 


3842 


M 


141 


167 


3849 


M 


141 


570 


3856 


H 


L29 


448 


3863 


B 


F50 




3867 


M 


E28 


056 


3874 


H 


044 


448 


3881 


M 


I TO 


578 


3888 


H 


173 


574 


3895 


M 


173 


W68 


3902 


A 


167 


141 


3909 


H 


141 


581 


3916 


B 


F50 




3920 


H 


161 


280 


3927 


2 






3928 


/ 


280 




3932 


t 


201 




3936 


• 


136 




3941 








600 3944 








ERR 3961 








3963 








3965 








3967 








3970 








3973 








3977 








19 3979 








3981 








3984 








3987 








0720 3991 








Q45 3994 








0333 


H 


526 




0337 


M 


050 


347 


0344 


H 


000 


198 


0351 


M 






0352 


M 






0353 


M 






0354 


M 






0355 


A 


K06 


057 


0362 


C 


L06 


LI 2 



PRINT MESSAGE 
CARD NUM FOR 
FLO SEL PCHG 
OUT OF SEQUENCE 



RESTORE AFT SQER 
SET SEQ FIELD 
FOR COMPARE 



TEST FOR FIRST 



CO 



*G LIN 


CT 


LABEL 


OP 


A OPERAND 


3 460 






B 


ONCE 




3 470 






HCW 


TEST - 


7 


3 480 




SQAOD 


A 


ADLN6H 




3 490 






A 


AOLNGH 




3 500 






MCW 


TEST - 


4 


3 510 






MCU 


TEST - 


4 


3 520 






MCH 


TEST - 


7 


3 530 




SEQUMK 


sw 


0000 




3 540 




SQINST 


c 


0000 




3 550 




CLSQHM 


CH 


0000 




3 560 


5 




B 


BLARGR 




3 570 


•i 




B 


ERRORl 




3 580 


8 




B 


BLARGR 




3 590 






SU 


S EOF LOS 


1 


3 600 






A 


THREE 




3 610 






CH 


SEQFLOe 


1 


3 620 






B 


FL0SEQ& 


4 


3 630 




BLARGR 


MCM 


SQBASE 




3 640 






MCU 


ZZZERO- 


2 


3 650 






NOP 


RECLNG 




3 660 






B 


SW5 




3 670 




ONCE 


A 


TEST - 


10 


3 680 






B 


SQAOD 




3 690 




ERRORl 


SW 


SSD & 


4 


3 700 






MCW 


SEQERR 




3 710 






MCW 


B 




3 720 






B 


BLARGR 




3 730 




ERESTR 


CS 


0290 




3 740 






SW 


0201 




3 750 






cw 


SSO & 


4 


3 760 






B 


SEQFLO 




3 770 






MCW 


ZZZERO 




3 780 




LOREAO 


SW 


0001 




3 790 






NCW 


0001 




3 800 






SW 


0001 




3 810 






MCW 


0001 




3 820 






SW 


0001 




3 830 






MCW 


0001 




3 840 






B 


C0NM0V£ 


11 


3 850 




SEQERR 


OCW 


• 




3 860 




BRSEQ 


OSA 


• 




3 870 






ORG 


0600 




3 880 




FLOSEL 


MCW 


ONEOl 




3 890 






MCW 


FLOORG 




3 900 




ORG 


MCW 


0000 




3 910 






MCW 






3 920 






MCW 






3 930 






MCW 






3 940 






MCW 






3 950 






c 


SELCTR 





B OPERAND 



LOC 



PAGE 6 
INSTRUCTION COMMENTS 0246 



SQINST& 
TEST - 
TEST - 
SEQWMK£ 
CLSQWM£ 
SQINSTC 

0000 



SEQCNT 
SEQFL0& 3 



SEQFLDC 3 

SEQCNT 

AOLNGH 

SQINST& 3 



0290 
FLDSEQ 



SQINST& 3 
0001 
0001 
0001 

FLDSEQ 

CONTRL 
ORG G 3 
TEST 



SELTOT 



s 


0369 


B 


493 


S 


RECORD OF BLOCK 




0374 


M 


191 


423 






0381 


A 


L09 


194 


UPDATE TAPE 




0388 


A 


L09 


191 


LOCATION BY ONE 




0395 


M 


194 


419 


RECORD LENGTH 




0402 


H 


194 


430 


AND COMPARE 




0409 


M 


191 


426 


INSTRUCTIONS 




0416 


t 


000 








0420 


C 


000 


000 






0427 


a 


000 






u 


0431 


B 


468 


u 


BR SEQ OK 


T 


0436 


B 


504 


T 


BR SEQ ERR 


1 


0441 


8 


468 


057 


1 BR ALL FLDS CHKD 




0449 


t 


338 




SET INSTRUCTIONS 




0453 


A 


044 


340 


FOR NEXT FIELD 




0460 


n 


338 




TO BE SEQUENCED 




0464 


B 


337 








0468 


M 


047 


340 


RESET COMPARE 




0475 


M 


L04 


057 


TO CHECK MAJOR 




0482 


N 


J97 


L09 


SEQ FIELD 




0489 


B 


♦05 




BR TO MAIN RTNE 




0493 


A 


188 


423 






0500 


6 


381 








0504 


f 


#83 




SET INST TO PRIN 




0508 


M 


591 


290 


COMPLETE RECORD 




0515 


M 


L26 


333 


AND ERROR MSGE 




0522 


B 


468 








0526 


/ 


290 




RESTORE FROM 




0530 


t 


201 




SEQ ERR RTNE 




0534 


a 


♦83 








0538 


B 


337 








0542 


N 


L06 


423 






0549 


t 


001 




LOAD LAST REC 




0553 


M 


001 


001 


SEQ FIELDS TO 




0560 


t 


001 




READ AREA 




0564 


M 


001 


001 






0571 


t 


001 








0575 


H 


001 


001 






0582 


B 


W57 






SEQERR 


0591 










333 


0594 












0600 


M 


L23 


N50 


FIELD SELECTION 




0607 


M 


186 


617 






0614 


M 


000 


198 


MOVE FIELD 




0621 


M 






PARAMETERS 




0622 


N 






TO HOLD AREA 




0623 


M 










0624 


M 










0625 


C 


096 


N43 





PAGE 



•G LIN 


CT 


LABEL 


OP 


A OPERAND 


B OPERAND 


D 


LOC 


INSTRUCTION 


COMMENTS 0296 


3 960 






B 


PCHBRI 








S 


0632 


B 


740 


S 




3 970 






A 


0NE80 - 


2 


SELCTR 






0637 


A 


K06 


096 




3 980 




CTLCMP 


C 


TEST 




CONTRL 






0644 


C 


198 


N50 




3 990 






B 


PCHBR2 








/ 


0651 


B 


784 


/ 


BR FLOS IN PCH 


4 000 






BWZ 


CHRADD 




TEST - 


7 


K 


0656 


V 


814 


191 K 


TST CHAR INSERT 


^ 010 






A 


AOLNGH 




TEST - 


4 




0664 


A 


L09 


194 


UPDATE INST 


4 020 






A 


AOLNGH 




TEST - 


7 




0671 


A 


L09 


191 


BY RECORD LENGTH 


4 030 






MCW 


TEST - 


7 


INST £ 


3 




0678 


M 


191 


713 




4 040 






MCW 


TEST - 


4 


CUMINS £ 


3 




0685 


M 


194 


720 




4 050 






HCU 


TEST - 


4 


UMINST£ 


3 




0692 


M 


194 


702 




4 060 




UMINST 


SU 


0000 










0699 


ff 


000 






4 070 






MCW 


TEST - 


2 


INST £ 


6 




0703 


M 


196 


716 




4 080 




INST 


MCW 


0000 




0100 






0710 


M 


000 


100 


HOVE TAPE TO PCH 


4 090 




CWNINS 


CW 


0000 










0717 


a 


000 






4 100 




TRNFLO 


SW 


ORG G 


1 








0721 


t 


615 




UPDATE INST TO 


4 110 






A 


TWELVE 




ORG £ 


3 




0725 


A 


N48 


617 


PICK UP NEXT FLO 


4 120 






CW 


ORG £ 


1 








0732 


o 


615 






4 130 






B 


ORG 










0736 


B 


614 






4 140 




PCHBRI 


MCW 


BCLPl 




SM8 £ 


3 




0740 


H 


N57 


*92 




4 150 






B 


NUMCDS 










0747 


B 


*33 




BR TO PUNCH 


4 160 




CLPCHl 


CS 


0180 










0751 


/ 


180 




CLEAR PUNCH 


4 170 






SW 


0101 










0755 


f 


101 




AREA 


4 180 






MCW 


ZZZERO- 


1 


CONTRL 






0759 


M 


L05 


N50 


RESET COUNT 


4 190 






MCW 


ZZZERO- 


1 


SELCTR 






0766 


M 


L05 


096 




4 200 






A 


RECLNG 




AOLNGH 






0773 


A 


J97 


L09 


UPDATE REC CTR 


4 210 






B 


BLKTST- 


14 








0780 


B 


V25 






4 220 




PCHBR2 


MCW 


BCLP2 




SU8 £ 


3 




0784 


M 


N60 


*92 


BR TO PUNCH 


4 230 






A 


0NE80 - 


2 


CONTRL 






0791 


A 


K06 


N50 




4 240 






B 


NUMCOS 










0798 


B 


♦33 






4 250 




CLPCH2 


CS 


0180 










0802 


/ 


180 




CLEAR PUNCH 


4 260 






SW 


0101 










0806 


t 


101 




AREA 


4 270 






B 


CTLCMP 










0810 


8 


644 






4 280 




CHRAOO 


MCW 


TEST - 


8 


ZHHINS£ 


3 




0814 


M 


190 


838 


INSERT CHAR 


4 290 






MCW 


TEST - 


8 


ZINST £ 


14 




0821 


M 


190 


879 


FIELD IN 


4 300 






MCW 


TEST - 


2 


ZINST £ 


6 




0828 


H 


196 


871 


PUNCH LOCATION 


4 310 




ZWMINS 


SW 


0100 










0835 


t 


100 






4 320 






MCW 


TEST - 


2 


ZINST £ 


10 




0839 


M 


196 


875 




4 330 






C 


ONEOl 




TEST - 


10 




0846 


C 


L23 


188 




4 340 






B 


ZINST 








U 


0853 


B 


865 


U 




4 350 






MCW 


NOP 




ZINST £ 


7 




0858 


N 


L25 


872 




4 360 




ZINST 


MCW 


TEST - 


6 


0100 






0865 


M 


192 


100 




4 370 






MCW 


0100 










0872 


M 


100 






4 380 






CW 


0100 










0876 


n 


100 






4 390 






MCW 


CHRADO 




ZINST £ 


7 




0880 


M 


814 


872 




4 400 






B 


TRNFLO 










0887 


6 


721 






4 410 






CS 


0180 










0891 


/ 


180 






4 420 






SW 


0101 










0895 


t 


101 






4 430 




SWl 


B 


SW2 










0899 


B 


949 




SWITCH 1 


4 440 




SELFIL 


A 


0NE80 - 


2 


FILNUM 






0903 


A 


K06 


J82 


SELECT FILE 


4 450 




FILCMP 


C 


FILNUM 




SLFILl 






0910 


C 


J82 


J84 


TO BE PCHEO 



PAGE 8 



PG LIN 


CT 


LABEL 


OP 


A OPERAND 


B OPERAND 


4 460 


5 




B 


SU2 




A 470 


5 




B 


ENDFIL 




4 480 


8 


TAPMQV 


NCH 


SUl 


TPNTRY 


4 490 


4 




HCH 


BLANK 




4 500 


1 




CW 






4 510 


5 




B 


SELFIL 




4 520 


4 




B 


TAPMOV 




4 5S0 


4 


$N2 


NOP 


COLBIN 




4 540 


8 


M0V7AP 


HCW 


SUl 


TPNTRY 


4 550 


4 




NCM 


BLANK 




4 560 


1 




CU 






4 570 


5 




B 


TAPERR 




4 580 


4 


SW3 


NOP 


ERESET 




4 590 


5 


EOF 


B 


F I LEND 




4 600 


5 




B 


XTRPCH 




4 610 


7 




MCU 


CONSTl 


RECORD 


4 620 


5 




B 


NO SPF 




4 630 


4 


TSTXCP 


NOP 


EXCPTN 




4 640 


4 


SU4 


B 


FLDSEQ 




4 650 


4 


SH5 


B 


CREG 




4 660 


7 


NO SPF 


MCU 


NOP 


PUNCH e 2 


4 670 


4 




B 


TSTXCP 




4 680 


1 


XTRPCH 


P 






4 690 


1 




NOP 






4 700 


7 




MCU 


NOP 


XTRPCH 


4 710 


4 




B 


MOVTAP 




4 720 


7 


NUNCDS 


A 


ONEBO - 2 


CDCNT 


4 730 


7 


AU7T0T 


MCU 


COCNT 


0100 


4 740 


1 




NOP 






4 750 


7 




A 


0NE80 - 2 


MPLCOS 


4 760 


7 




C 


FXCONO 


HPLCDS 


4 770 


5 




B 


GPFIX 




4 780 


7 


MOVMCT 


MCU 


NPLCOS 


0100 


4 790 


1 




NOP 






4 800 


4 


CQNGMK 


B 


CVTTST 




4 810 


5 


SSD 


B 


PRTPCH 




4 820 


1 


PUNCH 


P 






4 830 


I 




NOP 






4 840 


I 




SPF 






4 850 


2 




SS 






4 860 


4 


SH8 


B 


CMP 




4 870 


7 


GPFIX 


MCU 


FIXED 


0100 


4 880 


I 




NOP 






4 890 


4 




B 


MOVMCT 




4 900 


7 


PRTPCH 


MCU 


0180 


0280 


4 910 


L 




P 






4 920 


I 




U 






4 930 


5 




B 


FRMCTL 




4 940 


4 




B 


sua - 3 




4 950 


5 


FRMCTL 


CC 


SUB - 3 





LOC 

0917 
0922 
0927 
0935 
0939 
0940 
0945 
0949 
0953 
0961 
0965 
0966 
0971 
0975 
0980 
09B5 
0992 
0997 
1001 
1005 
1009 
1016 
1020 
1021 
1022 
1029 
1033 
1040 
1047 
1048 
1055 
1062 
1067 
1074 
1075 
1079 
1084 
1085 
1086 
1087 
10B9 
1093 
1100 
1101 
1105 
1112 
1113 
1114 
1119 
1123 



INSTRUCTION COMMENTS 



0346 



B 949 
B Y57 
M SUl 
N L03 
a 

B 903 
B 927 
N 699 
M SUl 
M L03 
a 

B S88 
N T66 
B U73 
B 420 
M J93 
B #09 
N /28 
B 333 
B 600 
M L25 
B 997 
4 
N 

B 953 

A K06 

M L16 

N 

A K06 

C K05 

B #93 

M L2B 

N 

B V81 

B /05 

4 

N 

9 

K 4 

B 607 

M K92 

N 

B *67 

M 180 

4 

2 

B /23 

B tB6 

F #86 



S 

T 
POl 



POl 



K 
C 
183 

F 



#86 



#20 

L16 
100 

L2B 
L2B 
S 
100 



100 
280 

a 
1 



BR EOF ON UNEQUA 



BR ON COLBIN 
R READ TAPE 



BR ON TRAN ERR 
BR EOF 



BR EXCEPT RTNE 
BR SEQ RTNE 
BR FX VAR FLO SL 
NOP PCH RL ON F 

BYPASS RECORDS 
ON SENSE SUITCH 
C CONTROL 

UPDATE CD CNT 

HOVE CO CNT 

TO PUNCH 

UPDATE INTRA CNT 

TEST CO NUM FOR 

AODTL INFO 

HOVE INTRA TO PC 

BR CVT 705 GH 
BR PRTPCH ON 
PUNCH CARD 

PUNCH RELEASE 
STACKER SELECT 
BR TO REC SEG 
HOVE ADOTL INFO 
TO PUNCH 

MOVE PUNCH INFO 
TO PRINT AREA 
PRINT AND PUNCH 

BR TO NEXT SEG 



<VJ 



>G LIN 


CT 


LABEL 


OP 


A OPERAND 


4 970 


7 


EXCPTN 


LCA 


RECORD 




4 980 


7 




LCA 


RECORD 




4 981 


7 


EXCEPT 


A 


RECLNG 




4 990 


7 




A 


ADOEXl 




5 000 


7 




A 


A00EX2 




5 010 


7 




CM 


TSTCHIC 


1 


5 020 


7 


TSTCHl 


HCW 


0000 




5 030 


7 




C 


FIRSTX 




5 040 


5 




B 


TSTCH2 




5 050 


4 




B 


XCPFND 




5 060 


7 


TSTCH2 


new 


0000 




5 070 


7 




c 


SECNOX 




5 080 


5 




B 


SW4 




5 090 


4 


XCPFNO 


SH 


NUMCDSe 


4 


5 100 


7 




MCH 


LCPTPN 




5 110 


4 




MCH 


B 




5 120 


4 




SU 


BLKTST6 


11 


5 130 


7 




HCU 


BRXENO 




5 140 


7 


OPTION 


few 


NOP 




5 150 


7 




MCW 


NOP 




5 160 


4 




B 


SW5 




5 170 


7 


XCPEND 


LCA 


NMCDCWe 


6 


5 180 


7 




LCA 


BLKDCWC 


4 


5 190 


7 




LCA 


FOUR 




5 200 


7 




LCA 


TWO 




5 210 


4 




B 


BLKTST& 


7 


5 220 


4 


TAPERR 


NOP 


rPECNT 




5 230 


1 




P 






5 240 


8 




B 


ERRSTK 




5 250 


7 




MCW 


NOP 




5 260 


2 




SS 






5 270 


5 


TPECNT 


B 


1673 




5 271 


2 




NOP 






5 272 


7 




new 


B 




5 280 


7 




A 


0NE80 - 


2 


5 290 


8 




B 


BDBLCK 




5 291 


5 




CU 


SUl 




5 300 


7 




MCW 


B 




5 310 


4 




B 


MOVTAP 




5 320 


7 


ERRSTK 


MCW 


KEIGHT- 


1 


5 330 


4 




B 


TPECNT- 


2 


5 340 


7 


ERESET 


MCW 


ZZZERO 




5 350 


7 




MCW 


NOP 




5 360 


7 




MCW 


NOP 




5 370 


4 




B 


EOF 




5 380 


7 


BDBLCK 


NOP 


NOP 




5 390 


7 




NOP 


NOP 




5 400 


7 




NOP 


CDCNT 




5 410 


7 




SW 


SSD 6 


4 


5 420 


7 




MCW 


L0C8ND 





SW8 



B OPERAND 

TSTCH1£ 

TSTCH2£ 

RECORD 

TSTCHl £ 

TSTCH2£ 

TSTCH2t 

FIRSTX 

XCHARl 



SECNOX 
XCHAR2 



NUHCDSE 3 



BLKTSTG 10 
PRTPCH£ 7 
PRTPCH£ 8 

NUMCDSC 6 
BLKTSTt 11 
PRTPCH£ 7 
PRTPCH£ 8 



LOC 



PAGE 9 
INSTRUCTION COMMENTS 0397 



- 2 
£ 1 



TAPERR 
ERRCNT 
ERRCNT- 1 

SW3 

TPECNT- 2 

ERRCNT 
TAPERR 
SW3 



PRTPCH£ 7 
PRTPCH£ 8 
BBLKCT 
BLKTST£ 11 
BLKTSTfi 10 



1128 


L 


183 


/73 


TEST TAPE REC 


1135 


L 


183 


/96 


LOCATION FOR 


1142 


A 


J97 


183 




1149 


A 


083 


/73 


EXCEPTION COOES 


1156 


A 


J87 


/96 




1163 


a 


/71 


/94 




1170 


M 


000 


072 




1177 


C 


072 


080 


COWARE FIRST 


1184 


B 


/93 


/ 


CHARCTER 


1189 


B 


S12 






1193 


H 


000 


073 




1200 


C 


073 


084 


COMPARE SECOND 


1207 


B 


*01 


/ 


CHARACTER 


1212 


t 


*37 




SET INST TO 


1216 


M 


076 


♦36 


PROCESS EXCEPT 


1223 


M 


L26 




RECORD 


1227 


* 


V50 






1231 


M 


079 


V49 




1238 


M 


L25 


/12 




1245 


M 


L25 


/13 




1252 


B 


*05 






1256 


L 


091 


♦39 


RESET INST FOR 


1263 


L 


096 


V50 


NORMAL PROCESS 


1270 


L 


094 


712 




1277 


L 


L29 


/13 




1284 


B 


V#6 






1288 


N 


TIO 




TAPE ERROR 


1292 


4 






DUMMY PUNCH 


1293 


B 


T55 


4=87 N 


FOR PCH REL 


1301 


M 


L25 


T08 




1308 


K 


4 






1310 


B 


W73 


K 




1315 


N 









1317 


M 


L26 


S88 




1324 


A 


K06 


V03 




1331 


B 


T91 


V02 1 




1339 


U 


ZUl 


B 




1344 


M 


L26 


971 




1351 


B 


953 






1355 
1362 


M 
B 


070 
T0« 


T08 




1366 


M 


L06 


V03 


RESET FOR NORMAL 


1373 


M 


L25 


S88 


TAPE TRANS 


1380 


M 


L25 


971 




1387 


B 


975 






1391 


N 


L25 


/12 




1398 


N 


L25 


/13 


BLOCK OPTION 


1405 


N 


L16 


V07 




1412 


t 


+83 


V50 




1419 


M 


VIO 


V49 





za 



PG LIN 


CT 


LABEL 


OP 


A OPERAND 


B OPERAND 


5 430 






B 


ERESET 








5 431 






B 


FXBBLK 








5 435 




BBLKNO 


B 


FLDSEL 








5 440 






MCW 


THO 




PRTPCH£ 


8 


5 450 






HCH 


FOUR 








5 460 






CH 


SSD & 


4 


BLKTST£ 


11 


5 470 






MCW 


BLKDCWC 


4 


BLKTST6 


11 


5 460 






B 


BLKTST 








5 490 




FXBBLK 


H 










5 491 






MCW 


ZZZERO 




RCOUNT 




5 500 






MCH 


BBLKCT 




COCNT 




5 510 






CU 


SUl 








5 520 






MCW 


SUl 




TPNTRY 




5 530 






B 


ERESET 








5 540 






H 










5 550 




ERRCNT 


DCW 


• 








5 560 




BBLKCT 


DCU 


• 








5 570 




LOCBND 


DSA 


• 




BBLKNO 




5 560 




UPCNT 


MCH 


0NE80 




PCHHOVS 


6 


5 590 






MCW 


BRCMP 




SWB £ 


3 


5 600 






A 


0NE80 - 


2 


RCOUNT 




5 610 






MCH 


ZZZERO 




MPLCDS 




5 620 




BLKTST 


C 


RECBLK 




RCOUNT 




5 630 






B 


TSTXCP 








5 640 






A 


RECBLK 




RECTOT 




5 650 






MCH 


ZZZERO 




RCOUNT 




5 660 






MCW 


ZZZERO 








5 670 






MCH 


ZZZERO 








5 660 






B 


L ORE AD- 


7 






5 690 






B 


MOVTAP- 


4 






5 700 




CVTTST 


B 


CONVRT 




0101 




5 710 






SH 


CVTTST£ 


4 






5 720 






A 


0NE80 - 


2 


CVTTST£ 


6 


5 730 






CM 


CVTTST6 


4 






5 740 






C 


:VTTST6 


6 


ONEBO 




5 750 






B 


• £ 


5 






5 760 






B 


CVTTST 








5 770 






MCH 


ONEOl 




CVTTSTfi 


6 


5 760 






8 


SSD 








5 790 




CONVRT 


SH 


CVTTST£ 


4 






5 600 






MCH 


CVTTST6 


6 


C0NM0V£ 


6 


5 610 






CW 


CVTTSTS 


4 






5 620 




CONMOV 


MCH 


0595 




0000 




5 630 






8 


CVTTST£ 


8 






5 640 






CH 


0001 








5 650 






CH 


0001 








5 660 






CH 


0001 








5 870 






B 


MOVFAP- 


4 






5 660 




FILENO 


cs 


0299 








5 890 






cs 


0180 



















PAGE 10 


D 


LOG 


INSTRUCTION 


COMMENTS 04<fr5 




1426 


B 


T66 




RESET INST 




1430 


B 


U68 






T 


1434 


B 


600 


T 






1439 


M 


L29 


/13 


FOR NORMAL 




1446 


M 


094 




PROCESSING 




1450 


n 


+83 


V50 






1457 


M 


096 


V50 






1464 


B 


V39 




CORRECT TAPE 




1468 


• 






READ AREA 




1469 


M 


L06 


L12 






1476 


M 


V07 


L16 


BY HAND 


B 


1483 


U 


%\il 


B 




R 


1488 


H 


XUl 


POl R 




G 


1496 


8 


T66 


G 






1501 


• 










1503 












1507 










U34 1510 












1511 


M 


K08 


693 


UPDATE RECORD 




1518 


M 


K95 


♦92 


COUNT 




1525 


A 


K06 


L12 






1532 


M 


L06 


L28 






1539 


C 


KOO 


L12 


TEST FOR END 


T 


1546 


B 


997 


T 


OF BLOCK 




1551 


A 


KOO 


L20 


UPDATE REC TOT 




1558 


M 


L06 


L12 


COUNT 




1565 


H 


L06 




RESET RECORD 




1569 


M 


L06 




COUNTER AND 




1573 


B 


542 




ADD COUNTER 




1577 


B 


949 








1581 


8 


W31 


101 






1589 


» 


V85 




FOR CONVERSION 




1593 


A 


K06 


V87 


OF 705 GPMK 




1600 


a 


V85 




TO 1401 GPMK 




1604 


C 


V87 


K08 




T 


1611 


8 


W20 


T 






1616 


B 


V81 








1620 


M 


L23 


V87 






1627 


B 


♦79 








1631 


t 


V85 








1635 


M 


V87 


W52 






1642 


a 


V85 








1646 


M 


595 


000 






1653 


B 


V89 








1657 


□ 


001 








1661 


a 


001 








1665 


D 


001 








1669 


3 


949 








1673 


/ 


?99 




CLEAR PRINT 




1677 


/ 


180 




f»U!^CH AND 



PG LIN 


CT 


LABEL 


OP 


A OPERAND 


5 900 


4 




cs 


0080 




5 910 


1 




P 






5 920 


7 




HCW 


C0NST3 




5 930 


4 




HCW 


RECTOT 




5 940 


4 




HCW 


C0NST2 




5 950 


4 




HCM 


CDCNT 




5 960 


I 




U 






5 970 


2 




CC 






5 980 


4 




CS 


0225 




5 990 


4 




su 


0201 




6 000 


7 




su 


0101 




6 010 


7 




MCM 


0225 




6 020 


1 




MCH 






6 030 


1 




new 






6 040 


7 




MCH 


PRTPCH6 


7 


6 050 


8 




8 


ALTSTK 




6 060 


7 




MCN 


NOP 




6 070 


5 




B 


SWB ON 




6 080 


8 


TSTALL 


B 


ALLTAP 




6 090 


4 




B 


TYPFIL 




6 100 


4 


TSTNUM 


B 


MLTFIL 




6 110 


4 




SU 


FILCNP£ 


4 


6 120 


7 




A 


TWO 




6 130 


4 




CM 


FILCHP& 


4 


6 140 


4 




8 


NEWFIX 




6 150 


7 


MLTFIL 


A 


0NE80 - 


2 


6 160 


■ 7 




C 


NUMFIL 




6 170 


5 




B 


NEWFIX 




6 180 


4 


PR OS NO 


CS 


0299 




6 190 


7 




new 


ZZZERO- 


1 


6 200 


4 




sy 


0201 




6 210 


4 




CS 


TPNTRY£ 


98 


6 220 


5 




B 


FILE 




6 230 


5 


REEL 


CU 


SUl 




6 240 


4 


FILE 


H 


MEWFIX 




6 250 


7 


ALTSTK 


MCW 


LETR K 




6 260 


4 




B 


TSTALL- 


5 


6 270 


7 


ENOFIL 


HCM 


ZZZERO- 


1 


6 280 


7 




HCW 


LOCSLF 




6 290 


4 




8 


PROS NO 




6 300 


4 


SWB ON 


H 


TSTALL 




6 310 


7 


ALLTAP 


LCA 


GPMK78 




6 320 


8 




LCA 


SUl 




6 330 


4 




MCW 


BLANKS 




6 340 


4 




B 


TRAILR 




6 350 


5 




B 


PROS NO 




6 360 


5 


BKSPSE 


CU 


Wl 




6 370 


4 




B 


TYPFIL 




6 380 


8 


TRAILR 


B 


TRALOK 




6 390 


7 




C 


TPNTRY£ 


79 



B OPERAND 



0225 



0001 
RECTOT 



XTRPCH 
PUNCH C 3 
PUNCH C 3 

NUMFIL 



FILCMP& 6 



FILTOT 
FILTOT 



FILTOT 



PUNCH & 3 

FILNUH 
FILCMP& 6 



TPNTRY& 80 
TPNTRY 



TPNTRY& 80 
TRALOC 











PAGE li 


LQC 


INSTRUCTION 


COMMENTS 0495 


1681 


/ 


080 




READ AREAS 


1685 


4 






DUMMY PUNCH 


1686 


M 


N41 


225 


MOVE REC TOT 


1693 


M 


L20 




AND CD CNT TO 


1697 


H 


N32 




PRINT AREA 


1701 


M 


L16 






1705 


2 






PRINT 


1706 


F 


1 




CLEAR PRINT AREA 


1708 


/ 


225 






1712 


t 


201 






1716 


t 


101 


001 




1723 


H 


225 


L20 


RESET REC TOT 


1730 


M 






AND CO CNT CNTRS 


1731 


M 








1732 


M 


/12 


♦20 




1739 


B 


Y46 


*87 N 


ALTERNATE STACKR 


1747 


M 


L25 


♦87 




1754 


B 


Y75 


B 


BR HALT ON B 


1759 


B 


Y79 


K02 


BR TRAIL EOR 


1767 


B 


Z93 






1771 


8 


X94 




BR TO SPEC FILES 


1775 


f 


914 




W»OATE SELECT 


1779 


A 


L29 


916 


FILE COUNT 


1786 


a 


914 






1790 


B 


Z59 




BR NEW FIX INFO 


1794 


A 


K06 


L32 


UPDATE SPECIFIED 


1801 


C 


K02 


L32 


FILE COUNT 


1808 


B 


Z59 


/ 


BR ON MORE FILES 


1813 


/ 


299 






1817 


M 


L05 


L32 


RESET FILE COUNT 


1824 


t 


201 






1828 


/ 


P99 






1832 


8 


Y42 


E 


NO REWIND 


1837 


U 


lUl 


R 


REWIND TAPE 


1842 


• 


Z59 




HALT BR NEW FIX 


1846 
1853 


M 
B 


L30 
X54 


*87 




1857 


M 


L05 


J82 


RESET SELECT 


1864 


M 


099 


916 


FILE COUNTER 


1871 


B 


Y13 






1875 


• 


X59 






1879 


L 


L24 


pel 




1886 


L 


SUl 


POl R 




1894 


N 


J90 






1898 


B 


Z16 




BR TO TRAILER 


1902 


B 


Y13 


K 


BR ON 2 TPMKS 


1907 


U 


XUl 


B 




1912 


B 


Z93 






1916 


B 


Z40 


P8l 


TEST TRAILER LAB 


1924 


C 


P80 


040 


ON TAPE TO LABEL 



tri 



>G LIN 


CT 


LABEL 


OP 


A OPERAND 


6 400 


5 


TRALRT 


B 


BKSPSE 




6 410 






B 


PROS NO 




6 420 




TRALOK 


C 


TUG 




6 430 






MCM 


TPNTRY£ 


79 


6 440 






C 






6 450 






8 


TRALRT 




6 460 




NEHFIX 


CS 


TPNTRYS 


80 


6 470 






NOP 


TPNTRY 




6 480 






B 


HORPRO 




6 490 






R 






6 500 






NOP 






6 510 




RDADTL 


NOP 


0000 




6 520 






NOP 






6 530 






CS 


0080 




6 540 






SU 


0001 




6 550 






B 


HORPRO 




6 560 




TYPFIL 


B 


TSTNUH 




6 570 






LCA 


GPNK78 




6 580 






MCU 


SUl 




6 590 






MCH 


BLANKS 




6 600 






CS 


0160 




6 610 






sw 


0101 




6 620 






B 


TSTNUM 




6 630 






B 


TRALES 




6 640 






MCW 


TPNTRYE 


79 


6 650 




TRANRC 


new 


0280 




6 660 






w 






6 670 






CS 


0280 




6 680 






CS 


TPNTRYG 


81 


6 690 






SU 


0201 




6 700 






B 


TYPFILC 


11 


6 710 




TRALES 


MCU 


TPNTRYS 


79 


6 720 






HCU 






6 730 






B 


TRANRC 




6 740 




HDRPRQ 


8 


SUl 


8 


6 750 






MCU 


%U1 




6 760 






MCU 


BLANK 




6 770 






CU 






6 780 






B 


SUl 


8 


6 790 






NOP 


INITL 




6 800 




PARTI 


NOP 


TPNTRYfi 


79 


6 810 






NOP 


0280 




6 820 






NOP 






6 830 






NOP 


0280 




6 840 




PART 2 


MCU 


TPNTRY6 


79 


6 650 






NOP 


0280 




6 860 






U 






6 870 






CS 


0280 




6 880 






SU 


0201 




6 890 






MCU 


8 





B OPERAND 



TUO 
TRALOC 



LOC 



PAGE 12 
INSTRUCTION COMMENTS 0545 



0000 



TPNTRYS 80 
TPNTRY 



TPNTRYS 80 

0280 

0180 



TPNTRY 
0280 

TPNTRY 



0280 
0180 



0200 
0180 



0200 
PARTI - 



1931 


B 


Z07 


/ 


STORED FROM CAR 


1936 


B 


Y13 






1940 


C 


L29 


L29 




1947 


M 


P80 


040 




1954 


C 








1955 


B 


Z31 






1959 


/ 


P81 






1963 


N 


POl 






1967 


B 


-83 






1971 


1 






INSERT NEU 


1972 


N 






INFORMATION IN 


1973 


N 


000 


000 


FIXED INFO AREA 


1980 


N 








1981 


/ 


080 






1985 


* 


001 






1989 


B 


-83 






1993 


B 


X71 






1997 


L 


L24 


P81 


PROCESS TRAILER 


2004 


M 


«U1 


POl R 


LABELS 


2012 


M 


J90 




BETUEEN FILES 


2016 


/ 


180 






2020 


t 


101 






2024 


B 


X71 


K 




2029 


B 


-71 


P81 




2037 


M 


P80 


280 




2044 


M 


280 


180 




2051 


2 








2052 


/ 


280 






2056 


/ 


P82 






2060 


t 


201 


POl 




2067 


B 


-04 






2071 


M 


P80 


280 




2078 


M 








2079 


B 


-44 






2083 


B 


891 




PROCESS HEADER 


2087 


M 


ZUl 


POl R 


LABELS BETUEEN 


2095 


M 


L03 




FILES 


2099 


a 








2100 


B 


891 


K 




2105 


N 


J65 






2109 


N 


P80 


280 


FIRST 80 CHAR 


2116 


N 


280 


180 




2123 


N 








2124 


N 


280 






2128 


M 


P80 


200 


SECOND 80 CHAR 


2135 


N 


280 


180 




2142 


2 








2143 


/ 


280 






2147 


t 


201 


200 




2154 


H 


L26 


JOS 





^:> 



PAGE 13 



PG LIN 


CT 


LABEL 


OP 


A OPERAND 


B OPERAND 


6 900 


4 




B 


HORPRO& 4 




6 910 


7 


INITL 


MCW 


NOP 


PARTI - 4 


6 920 


5 




CU 


SUl 




6 930 


4 




B 


SHI - 8 




6 940 


2 


FILNUM 


OCH 






6 950 


2 


SLFILl 


DCW 






6 960 


2 


SLFIL2 


OCH 






6 970 


2 


SLFIL3 


DCW 






6 980 


2 


BLANKS 


OCH 






6 990 


3 


TPNTRY 


OS 


2701 




7 000 


3 


CONSTl 


OCH 






7 010 


4 


RECLNG 


OCH 






7 020 


3 


RECBLK 


OCH 






7 030 


2 


NUHFIL 


OCH 






7 040 


1 


ENDTYP 


DCH 






7 050 


2 


FXCONQ 


DCH 






7 060 


3 


0NE80 


OCH 






7 070 


3 


ZER080 


OCH 






7 080 


1 


SIX 


DCH 






7 090 


80 


FIXED 


OS 






7 100 


3 


BRCHP 


OS A 




CHP 


7 110 


3 


BRUPCT 


OSA 




UPCNT 


7 120 


1 


UNI TNG 


DCH 






7 130 


3 


SXTEEN 


OCH 






7 140 


1 


BLANK 


DCH 






7 150 


3 


ZZZERO 


DCW 






7 160 


3 


ADLNGH 


OCH 






7 170 


3 


RCOUNT 


OCH 






7 180 


4 


COCNT 


DCH 






7 190 


4 


RECTOT 


DCH 






7 200 


3 


ONEOl 


OCH 






7 210 


1 


6PMK78 


DCW 






7 220 


1 


NOP 


DCH 






7 230 


1 


B 


OCH 






7 240 


2 


MPLCDS 


DCH 






7 250 


1 


TWO 


DCW 






7 260 


1 


LETR K 


DCW 






7 270 


2 


FILTOT 


DCH 






7 280 


12 


FLO 1 


OCH 






7 290 


12 




DCW 






7 300 


12 




DCW 






7 310 


12 




DCW 






7 320 


12 




DCW 






7 330 


12 




DCW 






7 340 


12 




DCW 






7 350 


12 




DCH 






7 360 


12 




DCH 






7 370 


12 




DCH 






7 380 


12 




DCH 






7 390 


12 




DCH 







LOC 



INSTRUCTION CO^iMENTS 



0595 





2161 


B -87 




2165 


M L25 J05 




2172 


U XUl B 




2177 


B 891 




2182 






2184 






2186 






2188 






2190 






2701 




POO 


2193 
2197 
2200 
2202 
2203 
2205 




180 


2208 




080 


2211 




6 


2212 
2292 




607 


2295 




Vll 


2298 




1 


2299 




016 


2302 
2303 




000 


2306 
2309 
2312 
2316 
2320 




101 


2323 
2324 




N 


2325 




B 


2326 
2328 




2 


2329 




K 


2330 
2332 
2344 
2356 
2368 
2380 
2392 
2404 
2416 
2428 
2440 
2452 
2464 
2476 





PAGE 14 



Hi LIN 


CT 


LABEL 


OP 


A OPERAND 


7 400 


12 




DCW 




7 410 


12 




DCH 




7 420 


12 




DCW 




7 430 


12 




DCW 




7 440 


8 


C0NST2 


DCW 




7 450 


9 


C0NST3 


DCW 




7 460 


2 


SELTOT 


DCW 




7 470 


2 


FULTOT 


OCW 




7 480 


1 


SEQTOT 


DCW 




7 490 


2 


TWELVE 


OCW 




7 500 


2 


CONTRL 


DCW 




7 510 


4 


ZZ80 


OCW 




7 520 


3 


BCLPl 


DSA 




7 530 


3 


BCLP2 


DSA 




7 540 


80 


TRALOC 


OS 




7 550 


3 


BRFILE 


DSA 




7 560 


1 


THREE 


OCW 




7 570 


3 


SQBASE 


DSA 




7 580 


3 


SQFLOl 


DCW 




7 590 


3 


SQFLD2 


DCW 




7 600 


3 


SQFL03 


DCW 




7 610 


1 


SEQCNT 


DCW 




7 620 


1 


LETR F 


DCW 




7 630 


3 


ONEOO 


DCW 




7 640 


3 


BR UP 


DSA 




7 650 


3 


BRVAR 


DSA 




7 660 


2 


STKHLO 


DCW 




7 670 


2 


KE IGHT 


DCW 




7 680 


1 


FIRSTX 


OCW 




7 690 


I 


SECNOX 


DCW 




7 700 


3 


LCPTPN 


DSA 




7 710 


3 


BRXEND 


DSA 




7 720 


1 


XCHARl 


DCW 




7 730 


3 


AODEXl 


DCW 




7 740 


1 


XCHAR2 


DCW 




7 750 


3 


ADDEX2 


DCW 




7 760 


1 


MVOIGT 


DCW 




7 770 


I 


LETR S 


DCW 




7 780 


3 


L0CSU4 


DSA 




7 790 


1 


LETR Y 


DCW 




7 800 


1 


FOUR 


DCW 




7 810 


2 


SELCTR 


DCW 




7 820 






EX 


START 


7 830 






ORG 


2701 


7 840 


8 




8 


TPUNIT 


7 850 


7 




MCW 


B 


7 860 


3 




R 


FIXCPT 


7 870 


3 


OPTST 


B 


PRINTX 


7 880 


8 




B 


PTPCHX 


7 890 


iJ 




B 


STKSLX 



B OPERAND 



LOC INSTRUCTION COMMENTS 



0645 



CLPCHl 
CLPCH2 

FILE 

SQFLDl 



UPCNT £ 14 
VNDTST- 7 



PRTPCH 
XCPENO 



SW4 



0117 

TSTXCP 

0160 

0117 

0117 

0117 





2488 












2500 












2512 












2524 










CDC NT 


2532 










NUM REC 


2541 
2543 
2545 
2546 










12 


2 548 
2550 










0080 


2554 










751 


2557 










802 


2560 
2640 










Y42 


2643 










3 


2644 










050 


2647 
2650 
2653 
2656 
2657 










F 


2658 










100 


2661 










V25 


2664 










649 


2667 
2669 










K8 


2671 
2672 
2673 










/05 


2676 










S56 


2679 
2680 
2683 
2684 
2687 













2688 










S 


2689 










♦01 


2692 










Y 


2693 










4 


2694 
2696 


B 


POl 








2701 


B 


A50 


117 


BR NO EXCEPTIONS 




2709 


H 


L26 


997 


SET INSTRUCTIONS 




2716 


B 


P77 


160 


FOR EXCEPTION 


2 


2724 


B 


P59 


117 2 


OPTION DESIRED 


3 


2>32 


B 


P92 


117 3 




4 


2740 


3 


Q03 


117 4 





oo 



PAGE 15 



PG LIN cr Label 



900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
8 000 
8 010 
8 020 
8 030 
8 040 
S 050 
8 060 
8 070 
8 080 
8 090 
8 100 
8 110 
8 120 
8 130 
8 140 
8 ISO 
8 160 
8 170 
8 180 
8 190 
8 200 
8 210 
8 220 
8 230 
8 240 
8 250 
8 260 
8 270 
8 280 
8 290 
8 300 
8 310 
8 320 
8 330 
8 340 
8 350 
8 360 
8 370 
8 380 
8 390 



PRINTX 



FIXCPT 

ERROR 
PTPCHX 

STKSLX 



SETXCP 



ST0RE2 



DGCHRl 



ANOOR 



OR 



DeCHR2 



N0CHR2 



OP 

MCM 
B 

new 

MCH 

B 

MCH 

B 

H 

MCM 

B 

MCU 

MCH 

MCH 

MCH 

C 

B 

MCH 

B 

A 

B 

MCH 

B 

A 

8HZ 

BHZ 

BHZ 

MCH 

MZ 

B 

B 

B 

MCH 

B 

B 

NOP 

MCH 

MCU 

BHZ 

BHZ 

BHZ 

MCH 

MZ 

B 

B 

B 

MCH 

B 

SH 

MCH 

MCH 



A OPERAND 

NOP 

SETXCP 

NOP 

NOP 

SETXCP 

NOP 

OPTST 



B OPERAND 
PUNCH & 2 



LOC INSTRUCTION COMMENTS 



0695 



- 3 



NOP 

PRINTX6 

STKX £ 

XCPSTKC 

RETSTK6 

NOP 

0117 

ERROR 

0118 

XLOCIM 

0124 

N0CHR2 

0125 

XL0C2M 

0130 

ZNCHRl 

DGCHRl 

ERROR 

NVOIGT 

BLANK 

ANDOR 

• C 
ERROR 
LETR S 
OR 

• C 
ERROR 
NOP 
L0CSU4 
ZNCHR2 
DGCHR2 
ERROR 
HVOIGT 
BLANK 
TPUNIT 

• e 

ERROR 
LETR S 
TPUNIT 
0125 
0124 

one 



PUNCH €. 
OPTIONS 

EXCEPT 



OPTION 

OPTIONS 6 
OPTIONS 13 
XCPENO& 20 
XCPENO& 21 
FOUR 

XCHARl 

0121 

AOOEXl 

0126 

XCHAR2 

0127 

A00EX2 

0120 

0120 

0120 

TSTCHl 

0120 

C12a 

0120 

TSTCHIC 18 

0119 

0119 

TSTCHl £ 19 

TSTCHl C 17 

0126 

0126 

0126 

TSTCH2 

0126 

0126 

0126 

TSTCH2S 18 



0130 
0125 



2748 


M 


L25 


♦ 86 






2755 


B 


Q31 








2759 


H 


L25 


♦86 






2766 


M 


L25 


S45 






2773 


B 


Q31 








2777 


M 


L25 


/42 






2784 


B 


P24 








2788 


, 


P88 








2792 


M 


L25 


S3 8 






2799 


B 


P66 








2803 


M 


A35 


S44 






2810 


M 


A42 


S5l 






2817 


M 


A49 


S76 






2824 


M 


L25 


S77 






2831 


C 


117 


094 




PICK UP PARAHTRS 


2838 


B 


P88 


T 




FOR EXCEPT OPTS 


2843 


M 


118 


080 




ANALYZE AND 


2850 


B 


A07 


121 


1 


MODIFY INST 


2858 


A 


124 


083 




TO PROCESS 


2865 


B 


£63 


126 




EXCEPTION RECORD 


2873 


M 


125 


084 






2880 


B 


A18 


127 


1 




2888 


A 


130 


087 






2895 


V 


£85 


120 


B 




2903 


V 


R26 


120 


2 




2911 


V 


P88 


120 


S 




2919 


M 


088 


/70 






2926 


Y 


L03 


120 






2933 


B 


R60 


120 


1 




2941 


B 


R53 


120 


2 




2949 


B 


P88 








2953 


M 


089 


/88 






2960 


B 


R94 


119 


2 




2968 


B 


R80 


119 


1 




2976 


N 


P88 








2980 


H 


L25 


/89 






2987 


M 


092 


/87 






2994 


V 


£96 


126 


2 




3002 


V 


£25 


126 


2 




3010 


V 


PBS 


126 


S 




3018 


M 


088 


/93 






3025 


Y 


L03 


126 






3032 


8 


A50 


126 


1 




3040 


B 


£52 


126 


2 




3048 


B 


P88 








3052 


M 


089 


Sll 






3059 


B 


A50 








3063 


t 


125 








3067 


M 


124 


130 






3074 


M 


118 


125 







cc 



PAGE 16 



tS9 



G LIN 


CT 


LABEL 


OP 


A OPERAND 


8 400 






B 


ST0RE2 




8 410 




ZNCHRl 


MCW 


LETR Y 




8 420 






B 


OGCHRl 




8 430 




ZNCHR2 


NCW 


LETR Y 




8 440 






8 


DGCHR2 




8 450 




XLOCIH 


NZ 


LETR Y 




8 460 






B 


ST0RE2- 


15 


8 470 




XLX2M 


HZ 


LETR Y 




8 480 






B 


ST0RE26 


15 


8 490 




STKX 


MCH 


SW8 


1 


8 500 




XCPSTK 


MCW 


KEIGHT 




8 510 




RETS7K 


MCW 


STKHLD 




8 520 




TPUNIT 


B 


PGMSEL 




8 5S0 






SM 


0142 




8 540 






MCU 


0142 




8 550 






MCH 


UNITNO 




8 551 






new 


UNITNO 




8 560 






MCU 


UNITNO 




8 570 






MCW 


UNITNO 




8 580 






MCW 


UNITNO 




8 590 






MCW 


UNITNO 




8 600 






MCW 


UNITNO 




8 610 






MCW 


UNITNO 




8 620 






MCW 


UNITNO 




8 630 






MCW 


UNITNO 




8 640 






MCW 


UNITNO 




8 650 




PGMSEL 


CS 


0080 




8 660 






SW 


0024 




8 670 






SW 


0063 




8 680 






R 






8 690 






B 


SELPGM 




8 700 






B 


RUNOUT 




8 710 




SELPGM 


B 


0056 




8 720 






B 


0056 




8 730 






R 


SELPGM& 


8 


8 740 




RUNOUT 


8 


0056 




8 750 






R 


RUNOUT 




8 760 






NOP 






8 770 






EX 


OPTST - 


23 


8 780 






ORG 


0600 




8 790 




VARECD 


MCW 


CONSTl 




8 800 






MCW 


VCONST 




8 810 






MCW 


ONEOO 




8 820 






SW 


VARINS& 


8 


8 830 






A 


0ME80 - 


2 


8 840 






A 


0NE80 • 


2 


8 850 






A 


0NE80 - 


2 


8 860 






CW 


VARINS£ 


8 


8 870 


B 


VNDTST 


BWZ 


VARENO 




8 880 


7 




C 


VARINSC 


13 


8 890 


5 




B 


VARINS 





B OPERAND 



TSTCHl 



TSTCH2 
0122 



0128 



LOC INSTRUCTION COMMENTS 



0745 



STKHLO 




SM8 


1 


SW8 


1 


0142 




UNITNO 




ALLTAPS 


10 


TPECNT6 


32 


TYPFILfi 


14 


REEL e 


3 


BKSPSE& 


3 


MOVTAP& 


3 


TAPMOVe 


3 


FXBBLK& 


18 


FXBBLK& 


23 


HORPROC 


7 


INITL L 


10 


0056 




0067 




0160 




RECLNG* 


3 


0076 





0076 



VARINS& 10 
VNOTSTe 6 
VARINS& 13 
VNOTSTG 4 
VARINSC 13 
VARINS& 10 
VNOTSTe 6 
VNDTST 6 4 
0000 
ONEdO 



3081 


B 


073 






3085 


M 


093 


no 




3092 


6 


R26 






3096 


M 


093 


/93 




3103 


B 


£25 






3107 


Y 


093 


122 




3114 


B 


Q58 






3118 


Y 


093 


128 




3125 


B 


Q88 






3129 


M 


#88 


069 




3136 


M 


071 


♦88 




3143 


H 


069 


#88 




3150 


B 


B46 


142 


BR NO SPEC TUNIT 


3158 


t 


142 






3162 


M 


142 


IC99 


MOVE SPECIFIED 


3169 


M 


K99 


V89 


TAPE UNIT NUM 


3176 


M 


K99 


T42 




3183 


M 


K99 


-07 


INTO ALL TAPE 


3190 


M 


K99 


Y40 


INSTRUCTIONS 


3197 


M 


K99 


ZIO 




3204 


M 


K99 


956 




3211 


M 


K99 


930 




3218 


M 


K99 


U86 




3225 


M 


K99 


U91 




3232 


M 


K99 


-90 




3239 


M 


K99 


J75 




3246 


/ 


080 




SELECT PROPER 


3250 


t 


024 


056 


ROUTINE FOR 


3257 


t 


063 


067 


MAIN PROGRAM 


3264 


1 








3265 


B 


B77 


160 


-r 


3273 


B 


B97 






3277 


B 


056 


J94 V 


READ VARIABLE 


3285 


B 


056 


076 2 


READ FIXED 


3293 


1 


B85 






3297 


3 


056 


076 


RD ANAL 


3305 


1 


B97 






3309 


N 
B 


POl 






0600 


N 


J93 


690 


SET INSTRUCTIONS 


0607 


M 


737 


662 


TO PROCESS 


0614 


M 


061 


693 


VARIABLE LENGTH 


0621 


t 


688 


660 




0628 


A 


K06 


693 




0635 


A 


K06 


690 




0642 


A 


K06 


662 




0649 


a 


688 


660 




0656 


V 


698 


000 1 




664 


C 


693 


K08 




0671 


B 


680 


S 





PAGE 17 



*G LIN 


CT 


LABEL 


OP 


A OPERAND 


8 900 


4 




B 


VARECOC 


21 


8 910 


7 


VARINS 


MCH 


BRVAR 




8 920 


7 




MCW 


0000 




8 930 


4 




B 


NUMCOS 




8 940 


7 


VARENO 


MCM 


BRUP 




8 950 


4 




CS 


0180 




8 960 


7 




SW 


VNOTSTC 


4 


8 970 


7 




MCW 


VNDTSTG 


6 


8 980 


4 




CW 


VNOTST& 


4 


8 990 


4 


VARCHM 


CM 


GOOD 




9 000 


4 




B 


VARINS& 


7 


9 010 


3 


VCONST 


DCH 


•. 




9 020 






EX 


RUNOUT 




9 030 






ORG 


0600 




9 040 


7 


CREG 


MCW 


RECLNG 




9 050 


7 


CMP 


C 


ZZ80 




9 060 


5 




B 


AD080 




9 070 


4 




CS 


0180 




9 080 


7 




SH 


0101 




9 090 


7 




MCW 


BRUPCT 




9 100 


7 


SETPCH 


MCH 


CHAR EG 




9 110 


7 




A 


CHAREG 




9 120 


4 




CW 


PCHMOV£ 


5 


9 130 


4 




B 


RECMOV 




9 140 


7 


A0D80 


A 


ZZ80 




9 150 


7 




S 


ZZ80 




9 160 


7 




MZ 


BLANKS- 


1 


9 170 


7 


RECMOV 


MCW 


RECORD 




9 180 


.7 


PCHHOV 


MCW 


0000 




9 190 


1 




NOP 






9 200 


4 




B 


NUMCOS 




9 210 


8 


COLS IN 


MCW 


SBl 




9 220 


5 




B 


TAPERB 




9 230 


7 




MCW 


ZZZERO 




9 240 


5 




B 


FILWMK 




9 250 


8 




MCW 


TPNTRY£159 


9 260 


7 




A 


ONEBO - 


2 


9 270 


7 




A 


0NE80 - 


2 


9 280 


7 




MCW 


SW8 


2 


9 290 


2 




P 






9 300 


2 




MOP 






9 310 


4 




CW 


TPNTRYei68 


9 320 


8 




B 


COLBIN 




9 330 


4 




B 


HOVTAP 




9 340 


4 


FILWMK 


CW 


TPNTRY£ 


1 


9 350 


4 




B 


F I LEND 




9 360 


8 


TSTBIN 


B 


HOVTAP 




9 370 


4 




B 


COLBIN 




9 38 


8 


TAPERB 


B 


BINBBK 




9 39 


5 




CU 


SUl 





B OPERAND 



SW8 & 3 
0000 

SH8 e 3 

0101 
VARCWM£ 3 



LOC 



INSTRUCTION COMMENTS 



CHAREG 
CHAREG 



PCHMOV£ 5 

SW8 £ 3 

PCHMOVC 6 
RECORD 



RECORD 
CHAREG 
CHAREG 

pcmove 

0180 



TPNTRY 

BERCNT 

0580 

CDCNT 

RECTOT 



TPNTRY&161 

TPNTRYt 80 
BERCNT- I 



POl 



0676 


B 


621 






0680 


H 


067 


♦92 




0687 


H 


000 


000 




0694 


B 


♦ 33 






0698 


N 


064 


*92 




0705 


/ 


180 






0709 


t 


660 


101 




0716 


H 


662 


730 




0723 


a 


660 






0727 


a 


000 






0731 


B 


687 






0737 


B 


B97 






0600 


M 


J97 


084 


SET CHAR CNT 


0607 


C 


N54 


084 


FOR FIX LNG REC 


0614 


B 


659 


U 


BR OVER 80 CHAR 


0619 


/ 


180 






0623 


* 


101 


692 


*. 


0630 


M 


K98 


♦92 


SET SW8 TO REC E 


0637 


M 


084 


693 


SET MOVE INST 


0644 


A 


084 


183 




0651 


o 


692 






0655 


B 


680 






0659 


A 


N54 


183 


UPDATE RECORD CT 


0666 


S 


N54 


084 


UPDATE CHAR CTR 


0673 


Y 


J89 


084 




0680 


M 


183 


690 




0687 


M 


000 


180 


MOVE REC PART 


0694 


N 






TO PUNCH AREA 


0695 


B 


♦33 






0699 


M 


SBl 


POl R 


PROCESS MIXED 


0707 


B 


793 


L 


BINARY AND BCD 


0712 


H 


L06 


854 


RECORDS 


0719 


B 


773 


K 




0724 


H 


060 


580 B 




0732 


A 


K06 


L16 


UPDATE CD CNT 


0739 


A 


K06 


L20 


AND REC TOT 


0746 


M 


*87 


755 




0753 


4 


C 






0755 


N 


4 






0757 


a 


C69 






0761 


B 


699 


062 5 


TEST LOOK 


0769 


B 


953 




AHEAD 


0773 


a 


P02 






0777 


B 


W73 






0781 


B 


953 


P81 




0789 


B 


699 




AHEAD 


0793 


B 


829 


853 1 




0801 


U 


SUl 


B 





ro 



PAGE 18 





i*G 


LIN 


CT 


LABEL 


OP 


A OPERAND 


B opera:^d 


D 


LOC 


INSTRUCTION 


COMMENTS 2084 




9 


391 


8 




BWZ 


BNTPER 


TPNTRY6168 


1 


0806 


V 


816 


Q69 1 






9 


400 


4 




B 


MOVTAP 








0814 


B 


953 








9 


410 


7 


8NTPER 


A 


0NE80 - 2 


BERCNT 






0816 


A 


K06 


854 


SET FOR 




9 


430 


4 




B 


COLBIN 








0825 


B 


699 








9 


440 


4 


BINBBK 


B 


COLBIN& 13 








0829 


B 


712 




SET INST 




9 


450 


1 




H 










0833 


, 






FOR BIN 




9 


460 


5 




CU 


SUl 






B 


0834 


U 


%{il 


B 






9 


470 


8 




NCM 


TBI 


TPNTRY 




R 


0839 


M 


XBl 


POl R 


PROCEDURE 




9 


480 


5 




B 


COLBIN& 13 






G 


0847 


6 


712 


G 






9 


490 


1 




H 










0852 


, 










9 


500 


2 


BEftCNT 


DCW 


• 








0854 












9 


510 






EX 


RUI«0U7 










B 


897 








9 


520 






ORG 


2701 




















9 


530 


8 


VARTST 


8 


VRANAL 


RECLNG- 


3 


V 


2701 


B 


F05 


J94 V 


BR VAR LNG ANAL 




9 


540 






B 


FINISH 


0143 






2709 


8 


R22 


143 


BR ON NO BINARY 




9 


550 






CS 


0599 








2717 


/ 


599 








9 


560 






CS 










2721 


/ 










9 


570 






su 


0401 








2722 


t 


401 








9 


580 






8 


MIXED 


0143 




2 


2726 


B 


043 


143 2 


BR MIXED BINARY 




9 


590 






MCN 


B 


MOVTAP £ 


2 




2734 


M 


L26 


955 






9 


591 






MCW 


• LI 


BOBLCKC 


7 




2741 


M 


P48 


T98 






9 


600 






MCW 


B 


TAPMOV& 


2 




2748 


N 


L26 


929 


SET BCD FIXED 




9 


610 






MN 


NOP 


AUTTOT£ 


4 




2755 


D 


L25 


+44 


LENGTH ROUTINE 




9 


620 






MN 


NOP 


GPFIX £ 


4 




2762 





L25 


♦97 


TO OPERATE IN 




9 


630 






CW 


GPFIX & 7 


AUTT0T6 


7 




2769 


a 


/OO 


♦47 


BINARY MODE 




9 


640 






new 


8 


AUTTOTE 


7 




2776 


n 


L26 


♦47 






9 


650 






HCH 


8 


GPFIX C 


7 




2783 


N 


L26 


/OO 






9 


660 






LCA 


8INKH 


PUNCH £ 


1 




2790 


L 


G04 


+85 






9 


670 






LCA 


8INPCH 


XTRPCH£ 


1 




2797 


L 


G04 


+21 






9 


671 






LCA 


BINPCH 


PRTPCH£ 


8 




2804 


L 


G04 


/13 






9 


672 






tcu 


NOP 


BBLKNO£ 


5 




2811 


M 


L25 


U39 






9 


673 






MCW 


NOP 


BBLKNOE 


12 




2818 


M 


L25 


U46 






9 


674 






MCM 


NOP 


BOBLCK 






2825 


N 


L25 


T91 






9 


675 






new 


NOP 


BOBI.CJC£ 


7 




2832 


M 


L25 


T98 






9 


680 






MCU 


NOP 


CHP 






2839 


N 


L25 


607 






9 


690 






MCH 


NOP 


CMP £ 


7 




2846 


N 


L25 


614 






9 


700 






C 


RECLNG 


ONE68 






2853 


C 


J97 


F91 






9 


710 






8 


FULLCD 






S 


2860 


8 


E73 


S 






9 


720 






MCH 


RECLNG 


CVTPCH 






2865 


N 


J97 


G02 






9 


730 






A 


CVTPCH 








2872 


A 


G02 








9 


740 






A 


CVTPCH 








2876 


A 


G02 








9 


750 






A 


RECLNG 


CVTPCH 






2880 


A 


J97 


G02 






9 


760 






NCU 


CVTPCH- 1 


8PCHHV- 


1 




2887 


N 


GOl 


F98 






9 


770 




PCHSET 


MCW 


NOP 


SETPCH 






2894 


M 


L25 


637 






9 


780 






LCA 


BPCHNV 


PCHMOV£ 


7 




2901 


L 


F99 


694 






9 


790 






MCW 


NOP 


UPCNT 






2908 


M 


L25 


VI 1 






9 


800 






MCW 


NOP 


UPCNr £ 


7 




2915 


M 


L25 


V18 






9 


810 




FINISH 


MCW 


UNITNO 


CLRTPE£ 


19 




2922 


M 


K99 


£33 






9 


620 






MCW 


UNITNO 


BACK UP £ 


3 




2929 


M 


K99 


E67 






9 


830 


8 




B 


NOSEL 


SLFILl 






2936 


B 


R62 


J84 


BR NO FILE SEL 


t^ 






























t>^ 































PAGE 19 



PG LIN 


cr 


LABEL 


OP 


A OPERAND 


B OPERAND 





LOC 


INSTRUCTION 


COMMENTS 0896 


9 840 


7 




new 


NOP 




TSTALL 






2944 


M 


L25 


X59 




SET INSTRUCTIONS 


9 850 


7 




HCM 


^DP 




TSTNUM 






2951 


M 


L25 


X71 




FOR SEL EOR 


9 860 


4 




B 


HEAOR 










2958 


B 


£06 








9 870 


8 


NOSEL 


B 


REELND 




NUHFIL 






2962 


B 


R77 


K02 




SET INST FOR 


9 880 


4 




B 


HE ADR 










2970 


B 


£06 






SPECIFIC FILE NU 


9 890 


3 


LCNWFX 


OS A 


• 




NEWFIX 




Z59 2976 












9 900 


7 


REELND 


MCM 


LCNUFX 




TVPFILC 


3 




2977 


M 


R76 


Z96 




SET INST FOR 


9 910 


7 




MCU 


LCNUFX 




TRANRC- 


17 




2984 


M 


R76 


-27 




TRAIL OR 2 TP 


9 920 


8 




B 


HEAOR 




ENOTYP 




1 


2991 


B 


£06 


K03 


1 


MKS EOR 


9 930 


7 




mu 


NOP 




BKSPSE- 


9 




2999 


N 


L25 


Y98 






9 940 


3 


HEAOR 


B 


NOHOER 




0147 






3006 


B 


E84 


147 






9 950 


7 


CLRTPE 


LCA 


GPHK78 




T1»NTRY£199 




3014 


L 


L24 


ROO 






9 960 


4 




CS 


TPNTRY&198 








3021 


/ 


Q99 








9 970 


1 




CS 












3025 


/ 










9 980 


4 




SW 


TPNTRY 










3026 


t 


POl 








9 990 


6 




MCM 


SUl 




TPMTRY 




R 


3030 


N 


SUl 


POl 


R 




10 000 


4 




MCW 


BLANK 




, 






3038 


M 


L03 








10 010 


1 




CM 












3042 


a 










10 020 


5 




B 


LDCLER 








K 


3043 


B 


F50 


K 






10 030 


4 




HOP 


BACKUP 










3048 


N 


E64 








10 040 


4 




su 


0144 










3052 


« 


144 








10 050 


7 




LCA 


0157 




0097 






3056 


L 


15T 


097 






10 060 


8 




B 


PRTHOR 




0087 




1 


3063 


B 


A44 


087 


1 




10 070 


8 




B 


PCHHOR 




0087 




2 


3071 


B 


COO 


087 


2 




10 080 


8 




B 


l«>CMP 




0087 




4 


3079 


B 


est 


087 


4 




10 090 


4 




B 


SETENO 










3087 


B 


005 








10 100 


7 


AFTIST 


PCU 


B 




CLRTPE€ 


34 




3091 


M 


L26 


£48 




SET INSTRUCTIONS 


10 110 


8 




B 


CLRTPEC 


16 


0097 






3098 


B 


£30 


097 




FOR HEADER AND 


10 120 


8. 




B 


HOPTR 




0097 




2 


3106 


B 


A29 


097 


2 


TRAILER LABEL 


10 130 


7 




MCU 


NOP 




HORPRO 






3114 


M 


L25 


-83 




PROCESSING 


10 140 


8 




B 


CLRTPEC; 


16 


0097 




1 


3121 


B 


£30 


097 


1 


BETUEEN FILES 


10 150 


7 


HOPTR 


MCM 


NOP 




TVPFIL 






3129 


H 


L25 


Z93 






10 160 


4 




B 


CLRTPEC 


16 








3136 


B 


£30 








10 170 


4 




B 


CLRTPEC 


16 








3140 


B 


£30 








10 180 


7 


PR7H0R 


C 


0086 




ZERO 80 






3144 


C 


086 


Kll 




PRINT HEADER 


10 190 


5 




B 


OBLINE 








T 


3151 


B 


B20 


T 




AND TRAILER 


10 200 


7 




SU 


PRTINS& 


1 


PRTINS £ 


5 




3156 


» 


A85 


A89 






10 210 


7 




MCU 


0086 




PRTINS£ 


6 




3163 


H 


086 


A90 






10 220 


7 




A 


0086 




PRTINS& 


3 




3170 


A 


086 


A87 






10 230 


7 




CU 


PRTINSe 


1 


PRTINSe 


5 




3177 


a 


A85 


A89 






10 240 


7 


PRTINS 


MCU 


TPNTRY- 


1 


0200 






3184 


M 


POO 


200 






10 250 


7 




MCU 


PRTINS& 


6 


PART 2 e 


6 




3191 


M 


A90 


J34 






10 260 


7 




NOP 


0280 




0180 






3198 


N 


280 


180 






10 270 


1 




H 












3205 


2 










10 280 


2 




CC 










1 


3206 


F 


1 








10 290 


4 




CS 


0280 










3208 


/ 


280 








10 300 


4 




SU 


0201 










3212 


• 


201 








10 310 


4 




B 


AFTIST 










3216 


B 


£91 








10 320 


7 


OBLINE 


MCU 


PRTINS& 


21 


PARTI £ 


14 




3220 


M 


B05 


J23 






10 330 


7 




MCU 


DBLI NE 




PARTI 






3227 


M 


B20 


J09 







CO 



PAGE 20 



PG LIN CT LABEL 



iN9 



10 340 


7 


10 350 


4 


10 360 


7 


10 370 


7 


10 380 


1 


10 390 


4 


10 400 


4 


10 410 


7 


10 420 


7 


10 430 


7 


10 440 


7 


10 450 


4 


10 460 


7 


10 470 


7 


10 4ao 


7 


10 490 


7 


10 500 


7 


10 510 


7 


10 520 


7 


10 530 


4 


10 540 


4 


10 550 


4 


10 560 


7 


10 570 


7 


10 580 


7 


10 590 


7 


10 600 


7 


10 610 


5 


10 620 


4 


10 630 


7 


10 640 


7 


10 690 


4 


10 660 


7 


10 670 


1 


iO 4M 


4 


10 690 


4 


10 700 


4 


10 710 


7 


10 720 


7 


10 730 


7 


10 740 


8 


10 750 


7 


10 760 


7 


10 770 


7 


10 780 


7 


10 790 


7 


10 800 


7 


10 810 


7 


10 820 


7 


10 810 


7 



PCHHOR 



HOCMP 



SETENO 



HDRNSe 



MIXED 



MCW 


OBLINE- 


12 


CS 


0280 




HCW 


TPNTRY£ 


79 


NOP 


0280 




W 






CS 


0280 




SM 


0201 




S 


ZER080 




HZ 


BLANKS- 


1 


MCW 


DBLINE& 


28 


MCW 


DBLINE 




B 


PRTHOR& 


12 


MCW 


PCHHOR 




MCW 


SIX 




MCW 


PCHHOR 




MCW 


SIX 




MCW 


PCHHOR 




MCW 


SIX 




MCW 


SIX 




CS 


0180 




SW 


0101 




B 


PRTHOR 




SW 


HOCMP t 


1 


A 


0086 




A 


0086 




CW 


HOCMP L 


1 


C 


3801 




B 


SETENO 




B 


HORMSG 




MCW 


MOP 




HCW 


NOI> 




• 


AFTIST 




ncM 


HD»ft 




-« 






CS 


0220 




SH 


0201 




H 


SETENO 




MCW 


B 




MCW 


NOP 




MCW 


UNITNO 




B 


• £ 


8 


MCW 


NOP 




MCW 


UNITNO 




MCW 


UNITNO 




MCW 


UNITNO 




MCW 


NOP 




MCW 


BINBR 




MCW 


BINBR 




HCW 


BINBR 




MCW 


NOP 





B OPERAND 


PARTI £ 


15 


0280 




0180 




0086 




0086 




PRTINS£ 


3 


PARTI £ 


7 


DBLINE£ 


32 


DBLINE£ 


39 


PRTINS£ 


14 


PRTINS£ 


21 


PART2 £ 


7 


PART 2 £ 


14 


TRANRC 




HOCMP £ 


4 


HOCMP £ 


6 


HOCMP £ 


3 


HOCMP £ 


4 


TPNTRY 




PART 2 £ 


14 


TRANRC £ 


7 



LOC INSTRUCTION COMMENTS 



0946 



0220 



SW2 

UPCNT £ 7 

BINBBK£ 13 
0158 
BINBBK 

BIN6BK£ 8 

TAPERB£ 11 

C0LBIN£ 3 

PUNCH £ 2 

SW8 £ 3 

NUMCOS- 1 

CVTTST- 1 
XTRPCH 



3234 


M 


BOB 


J24 


3241 


/ 


280 




3245 


M 


P80 


280 


3252 


N 


280 


180 


3259 


2 






3260 


/ 


280 




3264 


t 


201 




3268 


S 


Kll 


086 


3275 


Y 


J89 


086 


3282 


M 


B48 


A87 


3289 


M 


B20 


J16 


3296 


B 


A56 




3300 


M 


COO 


B52 PUNCH HEADER 


3307 


M 


K12 


B59 AND TRAILER 


3314 


M 


COO 


A98 


3321 


M 


K12 


805 


3328 


M 


COO 


J35 


3335 


M 


K12 


J42 


3342 


M 


K12 


-44 


3349 


/ 


180 




3353 


t 


101 




3357 


B 


A44 




3361 


t 


C90 


C93 COMPARE HEADl 


3368 


A 


086 


C95 


3375 


A 


086 


C92 


3382 


a 


C90 


C93 


3389 


C 


HOI 


POl 


3396 


B 


005 


S 


3401 


B 


023 




3405 


M 


L25 


J42 


3412 


n 


L25 


-51 


3419 


8 


£91 




3423 


H 


F85 


220 


3430 


2 






3431 


/ 


220 




3435 


f 


201 




3439 


• 


005 




3443 


M 


L26 


949 SET MAIN ROU 


3450 


M 


L25 


V18 


3457 


M 


K99 


842 


3464 


B 


079 


158 


3472 


M 


L25 


829 


3479 


M 


K99 


837 


3486 


M 


K99 


804 


3493 


M 


K99 


702 


3500 


M 


L25 


*86 


3507 


M 


F88 


♦92 


3514 


M 


F88 


♦32 


3521 


M 


F88 


VBO 


3528 


K 


L25 


*20 



PG 


LIN 


CT 


LABEL 


OP 


A OPERAND 


10 


840 


7 




HCW 


ZZ80 


10 


841 


8 




B 


FINISH 


10 


842 


7 




MCH 


NOP 


10 


850 


4 




B 


FINISH 


10 


860 


3 


BRPCH 


OS A 


• 


10 


870 


5 


8ACKUP 


CU 


SUl 


10 


880 


4 




B 


LDCLER 


10 


890 


7 


FULL CD 


MCW 


BNCNST 


10 


900 


4 




B 


PCHSET 


10 


910 


7 


NOHDER 


MCU 


LCLDCL 


10 


920 


7 




LCA 


0157 


10 


930 


4 




B 


AFTIST 


10 


940 


3 


LCLDCL 


OS A 


• 


10 


950 


7 


VRANAL 


MCH 


ALLTAP£ 


10 


960 


7 




MCM 


LCVRCD 


10 


970 


7 




MCH 


NOP 


10 


980 


7 




MCH 


NOHDER G 


10 


990 


7 




MCH 


LBLNKS 




000 


4 




B 


FINISH 




010 


3 


LCVRCD 


DSA 


• 




020 


3 


LBLNKS 


OSA 


• 




030 


4 


LDCLER 


CS 


0080 




040 


7 




SH 


0024 




050 


7 




SH 


0063 




060 


4 




R 


0056 




070 


14 


HO ERR 


DCH 






080 


3 


BINBR 


OSA 






090 


3 


0NE68 


OCH 






100 


8 


BPCHMV 


DCH 






110 


3 


CVTPCH 


OCH 






120 


2 


BINPCH 


OCH 






130 


3 


BNCNST 


OCH 






140 


3 


BRHDPR 


OSA 






150 






EX 


VARTST 




160 






ORG 


0181 




170 


3 


RECORD 


DCH 






180 


3 


FLDORG 


DSA 






190 


2 


CHTEST 


OCH 






200 


3 


HUE ST 


DCW 






210 


3 


LOTEST 


DCH 






220 


2 


PNTEST 


OCH 






230 


2 


TEST 


OCH 






240 






ORG 


0081 




250 


4 


CHAR EG 


DCH 






260 


7 


NMCOCM 


A 


0NE80 - ; 




270 


5 


BLKDCM 


B 


TSTXCP 




280 


3 


LOCSLF 


DSA 






290 






ORG 


2901 




300 


4 


CLEAR 


CS 


3997 




310 


1 




CS 





B OPERAND 



LOC 



PAGE 21 
INSTRUCTION COMMENTS 0996 



RECLNG 








3535 


M 


N54 


J97 




0158 








3542 


B 


R22 


158 




BINBBK 








3550 
3557 


M 
B 


L25 
R22 


829 




PUNCH 






4=84 


3563 














3 




3564 
3569 


U 

B 


%U1 
F50 


B 




CONSTl 








3573 

3580 


M 
B 


G07 
Q94 


J93 




AFT1ST& 


10 






3584 


H 


F04 


AOl 




0097 








3591 
3598 


L 
B 


157 
£91 


097 




LOCLER 






F50 


3604 










MOVTAP 








3605 


H 


Y86 


953 


SET MAIN PROGRAM 


SH5 L 


3 






3612 


N 


F46 


*08 


FOR VARIABLE 


PUNCH & 


2 






3619 


M 


L25 


t86 


LENGTH RECORDS 


NOVTAP& 


8 






3626 


M 


E91 


961 




HOVTAPa 


11 






3633 
3640 


H 
B 


F49 
R22 


964 




VARECD 






600 


3646 










BLANKS 






J90 


3649 
3650 


/ 


080 






0056 








3654 


» 


024 


056 




0067 


HEAD 


COMP 


UNEQ 


3661 
3668 
3685 


t 
1 


063 
056 


067 




TSTBIM 






781 
168 


3688 
3691 














H000580B 


3699 


















3702 
















4C 


3704 
















092 


3707 










HDRPRO 






-83 


3710 
0183 


B 


POl 






FLD 1 






L44 


0186 
0188 
0191 
0194 
0196 
0198 

0084 










CDCNT 








0085 


A 


K06 


L16 








T 




0092 


B 


997 


T 




SLFILI 






J 84 


0099 

2901 
2905 


/ 

/ 


197 




CLEAR TAPE 
READ-IN AREA 






PAGE 22 



PG LIN Cr LABEL 



OP 



A OPERAND 



B OPERAND 



LOC INSTRUCTION COMMENTS 



10A6 



11 320 

11 330 

11 340 

11 350 

11 360 

11 370 

11 380 

11 390 

11 400 

11 410 

11 420 

11 430 

11 440 

11 450 

11 460 



cs 
cs 
cs 
cs 
cs 
cs 
cs 
cs 
cs 
cs 

NOP 

cs 
sw 
cs 

END 



TPNTRY£198 



TPNTRY 

0080 

0001 

SWl 

CLEAR 



- 8 



TPNTRY£298 



2906 


/ 






2907 


/ 






2908 


/ 






2909 


/ 






2910 


/ 






2911 


/ 






2912 


/ 






2913 


/ 






2914 


/ 


Q99 




2918 


/ 






2919 


N 


POl 




2923 


/ 


080 




2927 


f 


001 




2931 


/ 


891 


R99 




/ 


ROl 


080 



OF ANALYZE 
INSTRUCTIONS 



lObh CARDS 



l\5 



C~2 






[U 



m 



International Business Machines Corporation 



General Products Division 
Development Laboratory 
Endicott, New York 



Pioneer 8-2211 



December 17, 1962 

MEMORANDUM TO: Users of 1401 Tape-to-Card Utility Program 

SUBJECT: 1401 Tape-to-Card Utility Program, #1401-UT-028, 

Version 1, Modification Level _1 



This letter announces the availability of Version Ij Modification Level 1 
of the 1401 Tape-to-Card Utility Program, #1401-UT-028. This modi- 
fication, which is in the form of three (3) patch cards as well as complete 
documentation, corrects all reported errors in the subject system. 
These patch cards, enclosed, listed, and identified below (Attachment #1) 
are to be inserted in the system decks as follows: 



Remove cards (cc 78-80) 

067 
068 
119 



and replace with cards (cc 77-80) 

C067 
CO 68 
C119 



Cards C067, C068 and C119 correct an error regarding the checking of 
blocked records in the exception routine. 

We appreciate your cooperation in making these changes. A list of the 
material distributed with this letter follows: 



Item No. 
1 , 
2 



Contents 
Three patch cards 

System listing of Version 1, Modification 
Level 1, heretofore known as the Initial 
Availability Version with its addendums 



9 7 

<v 4 



Page 2 



3 New documentation for the 1401 Tape -To- Card 
system replacing all pr odious documentation, 

4 List of three corrections to Preliminary 
Specifications Bulletin, #J24- 1411-1 

Initial requests for this system, which are filled after the release 
of this letter, will not include the cards itemized above as the system 
deck will already reflect these changes. 

The Optional Program Material, available upon request, consists 
of the source symbolic program deck. 

An Applied Programming Analysis Report (APAR) should be 
submitted through the IBM Systems Engineer to report any difficulties 
encountered in the use of this system. The APAR should be addressed 
to: 

APAR Processing 
IBM Programming Systems 
Department 302, Building 647 
Endicott, New York 

Any discrepancy between the material you receive and the items above 
should be directed to the attention of the Manager of the Program 
Information Department, IBM, 112 East Post Road, White Plains, 
New York. 



GP Programming Systems 
Attachment 

cc: Branch Office 
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General Products DUdaion 
Devdopment Laboratory 
Endicoti, New York 



Pioneer 8-2211 



December 17, 1962 

MEMORANDUM TO: Users of 1401 Tape-to-Card UtiUty Program 
SUBJECT: 1401 Tape-to-Card UtiUty Program, #1401-UT-028 



This letter transmits 1401-UT-028, Version 1^ Modification Level 0. 

Abstract for 1401 Tape-to-Card Utility Program 

Purpose: 

This program performs various tape-to-card operations in accordance 
with the users' specifications punched in a maximum of three control 
cards. Thus, output operations that were performed on the IBM 722 
Card Punch and IBM 758 Card Punch Control can now be performed on 
the 1401 Card Read-Punch. 

Machine Configuration 

1. 4000 positions of core storage 

2. High- Low- Equal Compare 

3. IBM 1403 Printer, Model 2 

4. One IBM 729 II, IV, V, VI or 7330 Tape Unit 

5. IBM 1402 Card Read-Punch 



30 



1401-UT-028 Page 2 



In accordance with the program request you submitted, the Basic Program 
Material being forwarded is: 

1. The condensed program deck which is sequentially numbered in 
columns 78-80. 

2. The documentation of 1401 Tape- to- Card including flow charts, 
a symbolic listing of the program and a listing of the program 
deck. 

The Optional Program Material being forwarded upon request is the 
symbolic source deck of the 1401 Tape- to- Card Program. 

When corrections are to be included or substituted in the symbolic deck, 
caution must be observed with respect to column 76, which is used as 
an overlay control during loading of the program. Cards numbered 
784-808 contain a one (1) and represent the variable length program. 
Cards numbered 809-857 contain a two (2) and represent the fixed length, 
no field selection program. Any inclusions or substitutions within these 
series of numbers must be appropriately punched in column 76. All 
other cards must be left blank in column 76, 

The following information will be helpful in implementing this system: 

IBM 1401 Data Processing System Bulletin: Utility Programs 
for IBM 1401 Tape Systems, Form number J24-1411-1. 

NOTE: The following changes affect bulletin J24-1411-1: 

Page 14 - under Control Cards, paragraph 2: Line 4 should 
read: 

". , , 300 characters per record in the input, , , " 

Page 14 - Figure 12: Card columns 1-4 should read: 

"characters per record " 

Page 15 - under Record Blocking, columns 1-4: Line 2 should 
read: 

"characters per fixed-length input record. " 

Page 17 - under Column 17 (4-punch): 

"Select excepted records into stacker 8 after punching, " 
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The 1401 Tape-to-Card Utility Program will be maintained through the 
use of modification letters. Whenever modifications are made to the 
program, a serially numbered letter, starting with number _!, accom- 
panied by the appropriate change cards will be mailed to all users. 
When the program is requested and the modification level is other than 
Oj all letters will be supplied with the material, but no change cards 
will be forwarded since ihe program deck will always reflect the latest 
changes. Should the nature or quantity of changes make a reassembly 
necessary, this will be distributed as a new version and modification 
letters to this new version will begin at 1, 

An Applied Programming Analysis Report (APAR) should be submitted 
through the IBM Systems Engineer to report any difficulties encountered 
in the use of this system. The APAR should be addressed to: 

APAR Processing 
IBM Programming Systems 
Department 302, Building 646 
Endicott, New York 

Any discrepancy between the material you receive and the items listed 
above should be directed to the attention of the Manager of the Program 
Information Department, IBM, 112 East Post Road, White Plains, 
New York, 



GP PROGRAMMING SYSTEMS 

Attachments 

cc: Branch Offices 

(No attachments sent with carbons) 
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General Products Division 
Programming Sjystems 
August 29, 1962 



1401 Tape-to-Card Utility Program 



1. Introduction 



The 1401 Tape-to-Card Utility Program will operate upon a variety of tape record arrangements to 
produce cards punched in a variety of output forms. The parameters of the particular tape to be processed 
and the output desired are specified by the user through a series of control cards, which are read into the 
1401 with this program deck. The minimum 1401 system necessary to utilize this program includes: 

1) 1401 Model C 3 

2) High- Low- Equal Compare 

3) 1403 Model 2 printer 

4) One (1) 729 Model 11, IV, V, VI, or 7330 Tape Unit 

5) 1402 Card Read-Punch 

2. Specifications 

1. Tapes may contain either fixed length records with fixed blocking, or variable length records 
singly blocked, in completely BCD mode. Tapes written in completely column binary mode may be fixed 
length, records with fixed blocking; mixed binary and BCD records must be singly blocked. 

2. The maximum block length allowed is 1197 characters. 

3. A maximum of 99 separate, adjacent files, within one (1) reel of tape may be processed during 
one pass of the program; or up to three (3) files may be selected from a tape. If there are more reels of 
tape to be processed containing the identical input and output specifications, the user need not reload the 
program unless Header Label comparison is required for each reel of tape. In addition, a file may be bypassed 
during the ruhning of the program under control of Sense Switch C. Sense Switch B will halt the program after 
each file has been processed regardless of control card specification. The program will revert back to the 
control card specification when Sense Switch B is in the off position. 

4. Up to two (2) characters of a record may be used to detect exception records. These may either 
be printed; printed and punched;psmt9<l..^ punched.;! 5J0CC'«piefcte,'lUo.J\t;'-^^ , or bypassed 
entirely, 

5. When more than one card is to be punched per record, intra-record numbering may be punched 
into the cards (BCD only). 

6. Sequence numbering of other than exception cards is permitted (BCD only). 

7. Additional information not present on tape records may be punched into all cards or a specific 
card for each tape record. A maximum of 80 consecutive characters is allowed. 

8. Additional information may be changed for each file provided that the length and the punch location 
and card number designations remain the same as has originally been specified in the control card (BCD and 
completely column binary). 

9. Any Tape Unit Number can be specified. If none is specified, unit number one (1) will be assumed. 

10. 705 group mark configuration (12-5-8) may be converted to 1401 configuration (12-7-8). 

11. Fixed length records may be punched in either of two (2) modes (BCD records only). 

a) Tape image - the records would be punched exactly as they appear on tape, in groupings of 
80 characters per card. Where the niunber of characters of the last group is less than 80, punching 
will start in column one (1) and punch through as many columns as necessary. 
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b) Field Selection - up to sixteen (16) portions of the record may be punched into a maximum 
of 99 cards in any order. Each field may consist of 80 characters or less in length and may be punched 
exactly sis it appears in the record, or may contain any single valid 1401 character, which will be 
punched, through the length of the field (i. e. , a field of three (3) positions containing ***). 

12. Variable length records are punched in the same manner as fixed length tape image. 

13. Three (3) fields up to a combined total of 80 characters in length may be specified for sequence 
checking of records within a file, 

14. At the end of each file, the number of records processed (including exception records) and the 
number of cards that have been punched (excluding exception records) will be printed. 

15. If a tape contains a header label as its first record, the label may be: 1) printed, 2) punched, 

3) bypassed, or 4) compared. If a header label precedes each file within the reel to be processed, all 
subsequent labels will be processed similarly to the first label except for label compare. Subsequent 
labels in this case will be bypassed. A tape mark following the header label of a file is acceptable, 
but not necessary. 

16. The following options are allowed the user in specifying a method to halt the program when all 
processing has been completed: 

a) Specifying the number of files to be punched. 

b) Selecting up to three (3) files for punching. 

c) 1. Where (a) is unknown, and (b) is not used, specifying the presence of a trailer label 
and allowing the program to check for it. 

2. Specifying the presence of two (2) consecutive END-OF-FILE marks on the tape. 

d) Under control of Sense Switch B, halt at the end of each file. 

17. Where a trailer label is present after each file, the program will follow the same procedure 
specified in the handling of header labels between files, A tape mark must precede, as well as 
follow, a trailer label. 

18. Under control of Sense Switch D, the program will print the exact image of what is being punched 
into cards, 

19. With reference to items 5, 6, 7, and 8, when punching cards in a tape image mode, the informa- 
tion that is not present in the tape record, but is to be punched into cards, will replace the data 
normally punched from the tape record. If the entire tape record and items 5, 6, 7 are to be punched, 
the field selection option is suggested. 
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Format of Control Cards 

As has been previously noted control card punching will follow directly from the input and output 
parameters present on the record and required as an output result. Although punching is not required for 
features which are not used, there are two fields which must always be punched for proper operation: 

1) Record Length (1-4) 

2) Blocking (5-7) 

NOTE: *signifies columns that should be considered for the minimum job in BCD. 

Control 

Card No. Columns Meanincf 

1 1-4 *Record Length - number of characters (including record mark if 

present). Enter WW in columns 1-4 for variable length records. 

1 5-7 ^ Records per block - number of actual records constituting a physical 

tape record. For variable length records, or mixed binary and BCD 
records, this must be 001, 

1 8-9 *Files within one tape reel to be punched - actual number of files, 

exclusive of Header and Trailer Labd s, that are to be punched. If 
unknown leave blank, but entry must be made in column 10 or 
columns 11-12. 

1 10 * End of Reel d esicfnation - leave blankfor double tape mark, enter 1 for 

trailer label indication if punching entire reel. A trailer label of up to 
80 columns in one card must be punched, which will be compared to the 
trailer label written on tape. An exact comparison will halt the program. 

Enter First selected fil e number for punching. 

Enter Second selected file number for punching. 

Enter Third selected file n umber for punching. 

Exception Record Procedure - a record may be processed in other than the 
normal manner. It may be bypassed (punch 1), printed (punch 2). printed 
and punched (punch 3), or printed, pundbed, anq selected., to. stackicr (8), 
(punch 4). If no exception record processing is required, leave blank. 

1 18 First exception character - character, digit, or zone. 

1 19 Exception code type - up to 2 columns of a record may be designated to 

denote exceptions. If an "and" condition between the columns is desired, 
punch a 1. If an "or" condition is desired, punch a 2. If only one 
exception character is used, columns 19, 25-30 are blank. 

1 20 Exception disposition for the presence of a character punch a (1), absence 

punch a (2), for the presence of a zone punch an (A), absence punch a (B), 
for the presence of a digit punch a (J), absence punch a (K). 

1 21-24 First exception character location on tape, punch actual character location 

within a record; i. e. , each record within a block could be excepted if 
the appropriate code applied, 

1 25 Second exception character 

1 26 Second exception disposition. 



1 


11-12 


1 


13-14 


1 


15-16 


1 


17 
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Control 

Card No. Columns Meaning 

1 27-30 Second exception character location on tape, 

1 31-32 Intra record card numbering - where multiple cards are produced per 

record, each card may be sequence numbered. This numbering will 
replace the corresponding information read from the actual record. 
Enter high order position of up to 2 columns on the card into which 
numbering is to be punched. Leave blank if no numbering is desired, 

1 33-34 Inter- record card numbering - all cards punched within a file may be 

consecutively numbered. This numbering will replace the corres- 
ponding information read from the actual tape record. Enter high order 
position of up to 4 columns on the card, into which numbering is to be 
punched. If no numbering is desired, leave blank, 

1 35 Number of Columns - reserved for file sequence numbering. Enter 

number of columns to be reserved. If numbering exceeds column 
allowance, high order position will contain zone overflow information. 

1 36-37 Insertion of Additional Information - fixed information not present in 

the tape record may be punched into all of the cards, or into a 
particular card within each record (for multiple cards per record) 
through the use of another card accompanying the control card (s). 
This information will replace corresponding information read from the 
actual tape record. Punch actual card number within a record into 
which the information is to be punched. Punch an (AA) for insertion 
in all cards, 

1 38-39 High order location - that fixed information is to be punched into, 

on card(s). 

1 40-41 • Number of Columns - to be reserved for fixed information (Maximum 

80 columns). 

1 42 *Tape Unit Selection - any tape unit may be specified, if left blank, 

unit (1) will be assumed. 

1 43 Column Binary records - if all binary records are to be processed, punch 

(1), if mixed binary and BCD punch (2), Mixed binary and BCD records 
must contain "look ahead" feature (last 4 columns of 84 character BCD 
record, last 8 characters of 168 character binary record)indicating 
mode of the record following. If all records are BCD, leave blank. 

1 44-46 *Header label length - Punch actual number of up to 160 characters 

contained in a header label. If no header, leave blank. 

1 47 *Header label processing - the header label may be printed, punch (1), 

punched, punch (2), bypassed, punch (3), compared against up to two 
cards (160 characters) accompanying control card(s), punch (4). 
Indication will be given for lack of comparison. 

1 48 Field Sequence Checking - up to 3 fields to a maximum of 80 characters 

within a record may be designated to be checked for correct sequence in 
a M, I, Vt arrangement, between records. Punch number of sequence 
fields to be checked, whose parameters differ from those of field 
selection. If all agree punch zero. If not used, leave blank. 

♦Signifies columns that should be considered for the minimum job in BCD, 
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Control 

Card No. Columns Meaning 

1 49-50 Sequence field 1 - punch the actual field number which coincides with 

the parameters used in field selection. If other than field selection 
parameters are desired, fill in the control fields of the selection number 
directly following the last true selection field number. Enter the number 
of characters, high order location on tape, and a series of 9's for the 
remaining two fields. 

Sequence field 2 - same as above. 

Sequence field 3 - same as above. 

Group Mark Conversion - if it is desired to change 705 group mark to 
a 1401 group mark punch a (1), if not desired, leave blank. 

1 56 Change fixed information - Where parameters of columns 36-41 of the 

control card remain the same foraU files, fixed information may be 
changed for each file. If desired, punch (1); if it is not wanted, leave 
blank. 

1 57 *Header or Trailer - between files - if a header and/or a trailer is 

interposed between fUes, the same options allowed for the first header 
on a file (with the exception of header compare) will hold true for labels 
between succeeding files. Header label compare will take the same path 
as bypassed headers. Punch a (1) for a header between files, a (2) for 
a trailer between files, a (3) for both, 

1 58 If hand correcting redundant tape transmission is desired, punch a (1), 

If not wanted, leave blank, 

1 59-60 Field selection - up to 16 fields may be designated to be selected from an 

actual tape record to be selectively punched Into one or more cards, ll^e 
only restriction Is that record field numbers must be related to output 
field numbers sequentially; e, g, , field number 1 cannot be assigned to 
output card number 5, and record field number 9 assigned to output card 
number 1. Enter number of fields to be used for field selection. 

1 61-62 First field number of characters - punch total number representing field. 

1 63-66 High order location on tape record - If a repetitive single character 

field Is desired (i. e, , MMMM) overpunch with an 11 punch the units 
position of the card number field (69-70). 

1 67-68 High order output field location - punch high order location on card Into 

which selected field Is to be punched. 

1 69-70 First Field card number - punch number of the card into which the field 

is to be inserted, 

i 71-72 Second field number of characters 

1 73-76 Second field high order location on tape record. 

1 77-78 Second field high order punch location. 

1 79-80 Second field card number, 

♦Signifies columns that should be considered for the minimum job in BCD, 
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Control 










Card No. 


Columns 




Meaning 


2,3 


1-2 




Fie^c^S, 


11 


2,3 


3-6 








2,3 


7-8 








2,3 


9-10 






2,3 


11- 


12 


Field 4, 


12 


2,3 


13- 


16 






2,3 


17- 


18 






2,3 


19- 


20 






2,3 


21- 


22 


Field 5, 


13 


2,3 


23- 


26 






2,3 


27- 


■28 






2,3 


29- 


.30 






2,3 


31- 


•32 


Field 6, 


14 


2,3 


33- 


■36 






2,3 


37- 


.38 






2,3 


39- 


■40 






2,3 


41- 


•42 


Field 7, 


15 


2,3 


43- 


■46 






2,3 


47- 


.48 






2,3 


49- 


■ 50 






2,3 


51- 


• 52 


Field 8, 


16 


2,3 


53- 


■ 56 






2,3 


57- 


-58 






2,3 


59- 


-60 






- 2 


61. 


-62 


Field 9 




2 


63- 


-66 






2 


67- 


-68 






2 


69- 


-70 






2 


71- 


-72 


Field IC 


1 


2 


73. 


-76 






2 


77- 


-78 






2 


79- 


-80 
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Operating Instructions 

A. The most critical part of the operation is the proper punching of the set of control cards and their 
insertion point in the main program deck. Refer to the DECK COMPLEMENT section of this write-up for the 
order and insertion point of the control cards. Punch entire field of only those options that are to be used. 

B, To run the program, use the following procedure: 

1) Set proper card form in punch hopper, 

2) Set carriage tape on printer and any paper form desired, 

3) Ready printer, 

4) Ready Reader-Punch. 

5) Place control cards in deck between 114 and 115 which are the last three digits in columns 
78-80 of deck. 

6) Place tape to be punched on tape drive and set drive to unit number specified in control card. 
When not specified, set to (1). 

7) Ready tape at load point. 

8) Set mode switch to run. 

9) Press Start Reset switch. 

10) Set desired sense switches. 

11) Press load button. 

C, Sense Switch Operating Control 

1) Switch B - when in the on position, program will stop after each data file has been processed, 
regardless of control card specification for file processing,. 

2) Switch C - when in the on position, program will bypass records continuously regardless 
of control card specification. To halt bypass operation at the end of a file, sense switch B 
must also be turned on, 

3) Switch D - when in the on position, all cards punched, including exception records, will be 
printed with the punched card image, 

4) Switch E - when in the on position, the program will not rewind the tape reel at the conclusion 
of all processing of a tape reel. When control card specification shows that only one file 

is to be processed, switch G must be turned on to prevent rewinding after processing the file. 

5) Switch F - when in the on position, will cause the punch release feature to become inoperable 
for the remainder of the job run. 

6) Switch G - when in the on position, will allow program to continue after a ten redundancy read 
attempts. When turned off, hand correction will be possible. 

D. Program Halts 

The following errors are checked for to insure correct operation of the program. 

1) Assignment Phase 

I-Address Course of 

Displayed Action 

a) Incorrect punching columns 17-30. 2792 Repunch control cards and restart, 

b) Field Selection card number designation 

not in correct sequence - Message printed. 3941 Repunch and Restart. 

c) Header label compare is unequal - 3443 Repunch and restart or continue 
Message printed. if desired. 
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2) Object Phase of Program 



I-Address 
Displayed 


Course of 
Action 


1467 


Set sense switch G off and mode 
switch to "D", or press Start 
button. 


1500 


After Storage Scan set mode 
switch to "N" and restart at 136^ 


0834 


Same as BCD tape action a. 


0853 


Same as BCD tape action b. 


1877. 


Press Start button. 


1844 


Press Start button . 



a) T^pe redundancy (BCD tape read) when 
control card column 58 contains a (1). 

b) Tape redundancy (BCD tape read) 
sense switch G off. 

c) Tape redundancy (binary tape read and 
control card column 58 contains a (1). 

d) Tape redundancy (binary tape read) and 
sense switch G off . 

e) Sense switch B in the on position. 

f ) End of processing of data file . 

E. Redundancy - ten tries are made to read a redundant record. If after ten tries, the record is still 
redundant, there are two courses of action possible, depending upon the punch in column 58 of the control card, 
and the setting of Sense Switsh G. If the user desires, redundancies may be disregarded and a print, as well 
as the normal punching of other than exception cards, will occur if column 58 is left blank. On exception 
records, exception routine option will prevail. If column 58 contains a (1) and switch G is off, the record will 
be printed and the program will halt. The operator will then set the Tape Select switch to "D" and press Start,, 
The record will then be re-read and stop due to the redundant character(s) in storage. Set mode switch to 
Storage Scan to find the redundant character(s) and manually correct storage. Reset the mode switch to "N" 
and restart the program at instruction address 1364* If no manual correction is desired, set sense switch G 
to on. Press Start Reset button to restart program. 

*For col. binary tape, restart at address 0712. 

During the first of the ten tries, an extra card will be punched (to eliminate a punch check due 
to punch release). This card will fall into the alternate file stacker ("N" or four) that is not accepting 
currentiy processed cards. 



NOTES: 



1. When the sequence checking option has been taken and a sequence error occurs, the entire 
record will be printed and a notation of the sequence error given. 

2. When the exception option is taken, the card count total will have excluded the total number of 
exception cards punched. The total number of records processed will include the number of 
exception records processed. 

3. During normal processing of files, cards that are punched will be selected into pocket four 
on alternate files; otherwise into the "N" pocket. 
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Examples 



Example #1 
Given: 



1. Tape reel containing 16 files 

2. Three records per block 

3. Eighty characters per record 

4. Added card with current month punched in columns 3-10 

5. No header or trailer label 

6. Use tape unit #1 



Result desired: 



1. 
2. 
3. 
4. 

Procedure: 



Punch files #3, 10, 16 

Except from punching records with an 8 in the 27th position 

Sequence check 2 fields 

Add current month in columns 37-44 of output card 



Punch control and added cards as follows: 



A. Control Card 



1. 
2. 
3. 
4. 
5. 
6. 
7. 



Card col. 

1-4 

5-7 

11-16 

17-24 

36-41 

48-52 

61-70 

71-80 



B. 



Additional Card 
3-10 



Punch 

0080 

003 

031016 

18bj0027 

AA3708 

00212 

1500646601 

0200457901 



JUL 1960 



Description 

Record length 
Records per block 
Selected files 
Exception coding 
Added card information 
Field sequence numbers 
Sequence field #1 parameters 
Sequence field #2 parameters 



Current month 



Example #2 
Given: 



1. 
2. 
3. 
4. 
5. 
6. 
7. 



Tape reel containing 11 files 

Five records per block 

Two hundred and fifty characters per record 

Additional card with information punched in columns 61-80 

Header label containing 120 characters 

Trailer label containing 60 characters 

Use tape unit #3 



Result desired: 



1. Punch all files (excluding header and trailer label) 

2. Except records with a zone x in position 1 or without a letter Z in the 12th position, 
bypass exceptions 

3. Sequence check 3 fields 

4. Field select 9 fields 

5. Add "Remit to our address" into columns 1-20 of first card of each record 

6. Sequence number each file 

7. Compare Header Label to Header Card 
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Procedure: 

Punch Header Label, Control Cards, added card and Trailer Label as follows: 
A. Header Label 





Card Col. 


Punch 


Description 


1. 


1-80 


First part of label 


Card #1 header label 


2 


1-40 


Second part of label 


Card #2 header label 


B. Control Cards 








card #1 








Card Col. 


Punch 


Description 


1. 


1-4 


0250 


Record Length 


2. 


5-7 


005 


Records per block 


3. 


10 


1 


Trailer label 


4. 


17-24 


1X2A0001 


First exception coding 


5. 


25-30 


Z20012 


Second exception coding 


6. 


33-35 


774 


File sequQicing numbering 


7. 


36-41 


010120 


Added card information 


8. 


42 


3 


Tape imit used 


9. 


44-46 


120 


Header label 


10. 


47 


4 


Compared 


11. 


48-54 


3080510 


Field Sequence numbers 


12. 


59-60 


09 


Field Selection number 


13. 


61-70 


1502362101 


Select Field #1 


14. 


71-80 
card #2 


1002015101 


Select Field #2 


15. 


01-10 


1500013601 


Select Field #3 


16. 


11-20 


1601016101 


Select Field #4 Sequence Field #3 


17. 


21-30 


3000164702 


Select Field #5 Sequence Field #2 


18. 


31-40 


4700460102 


Select Field #6 


19. 


41-50 


7601170103 


Select Field #7 


20. 


51-60 


0800940104 


Select Field #8 Sequence Field #1 


21. 


61-70 


2702100904 


Select Field #9 


C. Trailer Label 






1. 


1-60 


Trailer label 
information 


Trailer Label Card 
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THREE BLANK CARDS ONLY IF ADDITIONAL ^ 
INFO. BETWEEN FILES IS U?ED. A- 

ADDITIONAL INFO. CARDS TO BE / 



r 



INSERTED AFTER EACH DATA FILE HAS/ 
BEEN PROCESSED EXCEPTING 1^ 
CARD FOR FIRST FILE ' 



TRAILER LABEL-MAX IMUM- I CARD 





HEADER LABEL-MAXIMUM 2 CARDS 



FIRST FILE ADDITIONAL INFO. CARD MAX I MUM- 1 CARD 



CONTROL CARD(S)-MAXIMUM-3 CARDS 
MINIMUM- I CARD 
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XX 



CARD FORMAT 
IDENTIFICATION FIELD 

COLUMN amm. 

, 78-80 SEQUENCE NUMBER 
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PAGE 12 



:^ 



PRTHDR 



3^39 



READ CONTROL 
CARD J 




SET MAIN PROG. 
FOR HDR. & 
TRAILER BETWEEN 
FILES 



AFT I ST 




/varN 

I LOTH. ) 




FILE SKIP 
ON SELECT 
FILE PUNCH 



MOVE TAPE 
RECORD TO 
READ AREA 
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FIXED 
LENGTH 



SET RECORD 
LENGTH 




SET 80 CWR. 
TO PUNCH 
AREA 



SET SEQ 
COUNT ON 
NO. OF CARDS 



PCHMOV 



MOVE RECORD 
TO PUNCH 
AREA 




UPDATE CHAR. 

PER RECORDS 

CARD SEQ 

NO. 



MOVE RECORD 
PORTION TO 
PUNCH AREA 



AUTTOT 



MOVE CD 
COUNT TO 
PUNCH 



MOVE TO 
PUNCH AREA 





MOVMCT 



ZERO CARD 

SEQ COUNT 

AREA 
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ANALYZE ROUTINE 



PAGE \k 




LOAD ANAL. 
PART I AND 
MAIN PROGRAM 



FIXTST 



READ 
CONTROL 
CARD . 



SET MAIN 
PROGRAM FOR 
NUMBERING 



STORE 

CONTROL 

CARD INFO 



>-x 


READ AND 
STORE INFO 









SET WORD MARKS 
FOR NO. OF 
POSITIONS FOR 
PUNCHING 




STORTR 



STORE FIELD 
LOCATION FOR 
SEQ. ROUTINE 




HORLGH 



BYPASS MAIN 
• PROGRAM 

FIXED AND 
VAR. PROGR. 



BYPASS VAR. 
MAIN LENGTH 
PROGRAM 



READ MAIN 

FIXED LGTH. 

PROGRAM 



SET MAIN 
PROGRAM FOR 
OPTION USED 



UPDATE FIELD 
HOLD LOC. fr 
CARD FIELD 
PARAM. LOC. 
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PAGE 2 ANALYZE ROUTI^^ 




SET FIXED 
MAIN PROG. 
FOR BINARY 
PROCESSING 



SET E.O.F, 

PROCESS IN 

MAIN LINE 



FIELD SEQUENCE ROUTINE 



SET MAIN 
PROG HEADER fr 
TRAILER BETW. 
FILE ROUTINES 



PROCESS 

HEADER 

LABEL 




MOVE READ 
AREA SEQ. 
FIELD TO 
COMP. 




MOVE PREVIOUS 
RECORD SEQ. 
FIELD TO 
COMPARE 



COMPARE NEW 
REC.SEQ. FIELD 

TO PREVIOUS 
REC.SEQ. FIELD 



ERROR I 




MOVE. SEQ. 
FIELDS OF LAST 
REC. OF BLOCK 
TO RD. AREA 
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FIELD SELECT ROUTINE 



ORG 



PAGE 16 












MOVE SELECTOR 
FIELD TO 
HOLD AREA 






Y 








X^ST\_ 

<s^lELDjX~" 

N 1 

,,X^NCH\s^ 
^IN SAME CARDX 
S.AS PREVIOUS^ 
^\F|ELD/^ 


MOVE FIELD 
TO PUNCH 
AREA 







UPDATE CARD 

NUMBER FOR 

FIELD 

PUNCHING 



NUMCDS 



UPDATE FIELD 
LOCATION FOR 
NEXT RECORD 



ZERO CARD 

NUMBER 
COUNTER 



CTLCMP 



PUNCH ' 
CARD 




EXCEPTION ROUTINE 




TSTCHI 



TEST RECORD 

FOR FIRST 

EXCEPTION 

CODE 





TSTCH2 



TEST RECORD 

LOG. FOR 2ND 

EXCEPTION 

CODE 




OPTION 



SET MAIN PROG, 

TO OPTION 

DEFINED ON 

CONTROL CARD 
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mM FILE 



PAGE 17 



(read tape j 



PROCESS AS 

PER CONTROL. 

CARD 



ADD'TL. 




PRINT CARD 
COUNT AND 
RECORD count; 




READ TAPE 




HALT 



y 



SET SENSE 

SWITCH D IF 

COMP. TRAILER 

LABEL WAS USED 



HDRPRO 



READ TAPE 



^ 



PROCESS AS 

PER CONTROL 

CARD 



RESET FILE 
COUNTERS TO 

ALLOW NEW 
REEL PROCESS 




STORE NEW 
INFORMATION 
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VERSION I MOD4FICAT10>i LEVtL 1 



.CudO 15, U22U26,03CCi34, 041, 045, 053, 057073102 
Lw7211o, 110106, 105117B10l/I99,027A075C29n02 



,0 08015,022029,0 36039,04304 7/039036 ,051, 

/G80,Cai20l^lUlLL24I9clMQ80180A110KC3 ,P16, 

MAABP65112 A116J83AA .P41, 

KL25B99BA23135 , 135133A I 76 135A 135134 ,P80, 

f'.134+46,QJlS+84135YJ89l35A135Q33nQ31 ,Q12, 

,L12al33135BA30BA36141 ,136133,140 ,Q45, 

Bt04143lM141K04AI79141A141139Ml39+991 ,086, 

LO00K92N/O30,OQlBR39156 MK07Z 79KL25Z6 7 ,R13, 

Bb04137AM137K05BBl5132 ,131CJ97I9l ,R62, 
BR93T,L28M132t73BB22AK06132BR82M139&14,R89, 

,40OMA22*97a/00ML26/00ML25R00MA22R02 ,S26, 

/jaG/,40llCL£57272aR08KR93R08 ,t56, 

,K29R26AK06R31AK06R28KR01R25MAC4R01 ,£97, 
aiU9a26&a725HL2Si*40BA49160 K 1444^088095, A23, 

M381482BA63148 BC95ML25*Q1ML25V73BQ45 ,A68, 

ML25*62ML25t55BR54MJ89+66BA93ML2 5+67 ,804, 

3B72158 M953T91M953U05ML25U26MI44U29 ,844, 

ML25U64ML25b29BB921474BC28K031B:;361 ,B80» 

L080He0C146KllBC16rBBB01M080I60BB8C ,C12, 
iflCiaiSS -ML25*86,li5Ml55i95nl55,C44, 

8C7 7ML25+75, 024056,06306 71056, 048 ,C84, 

MI94A67M04aN46M060M060Ar446N45nQ48 ,017, 

M070I77MMMI69HBE81I761BA56I75 .041, 

-jU-mit5\/G32I77KB£21I701AJ93I73HI73 ,085, 

A165I75AIo5I70CI77163DI20UMI77L44MM ,E17, 

;saL5fl ME93AKO61B4Cia4KQ0 ,£47* 

BF93SAJ97I87BE5laL28,K778U21AI87I73 ,E81, 

- — AI37I70ML26E47C150iaiBG61SC152I31BH07S,F21, 

C154I81BH67SCI81!*45BA56SBG03I812 ,F57, 

AKQ6014*_E26AU48E28aE26MI77I63BD32 ,F88, 

MK06034MLC4F691F77YG21I71BU85YI77I70 ,G21, 

f1T7'iY,lflqiI77AIh'iF7SBPinMF?fln5n»117JQ55it-— ♦i^SX^ 

MI73552MI73rt60HI67559MI67I41BF50 ,G96, 

-_ M£2dQ53KI70567MI73W64HI73363AI67I41 ,H28, 

MI41I67MI41570ML29448BF50ME23056 ,H63, 

M044448MI7057eMI73574MI73W68AI67I41 ,H95, 

MI4l581BF50MI612802/230,20l.I36 ,127, 

6nnFLo cii-mi seq-ERr ,I62, 

19 0720 ,180, 
a45 

M526M05034 7M00019aMMKH ,351, 

AKQ6a57CL06L12B493SM191423AL09194 ,374, 

AL09191M194419M194430M191426,000 f409, 

CIlQOQO0nUUOa46aUBb04Ta463O57 1,338 ,436, 

AU4434Ga33rfB337MO47340ML04057r4J97L09 ,468, 

atQ5A138423U331,*83M59l29uML26333D468 ,504, 

/290t2aiat{i3D3 37ML06423,OOliM00100l ,538, 

,U0iMOUlOOl,OOlM00lO01BW57SEQERr<333 ,575, 

Ml23?'J50M136617M0C0198MMMM ,621, 

--.U12a:i43D740SAK06096£.193i\i50B734/ ,644, 

\/ol419lKAL09194AL09l9im917l3fU94 720 ,678, 



7B0010270B026/G991, DO 1/001117 100 
055, 056, Q63N, 067071, 75, 0011056 
P23»P2ft#P3llL03 7P37,P05,P128039 
P49,P56,P571L020P57,P39,P4GB039 
Pa71056 LQ36P93,P65,P73B039 
Q19,Q261056 L036U29,Q0l ,U05B039 
Q53,Q6C1056 LQ34Q63 ,Q34,Q4i8039 
U93,R0C1056 L037R00 ,Q72 ,Q79B039 
R17,R26,R321L03aR38,R0a,RD9B039 
ft661056 L034R72,R47,R54BC39 
R93,&OC,&041L038&lQ,R7a,R82B039 
&33,&401056 L036£46,&15,£>22B039 
&5a,&6b,&691L029&75,£,51,&52B039 
A041056 L035A10, £83, £908039 
A30*A3B«A451U}3aA48,A18,A22B039 
A75,A821056 L037AB5 ,A56, A64B039 
811,8151056 LO36B21,A93,B00B039 
B511056 L036B57, 630,8378039 
688,8921056 L035B92 •865*8728039 
C16,C17,C241L035C27,C00,CO7BD39 
C5UC55 ,ChZlL033C^5 »X;29 *C36B039 
C91,C951056 L033C98,C70,C77B039 
021,0281056 L033031, 006,0138039 
045, 046, D541L030061, 039,0408039 
D921QS6 La34U95,D69,D776£39 
E22,E29,E301L035E 30, E03,E 108039 
E51 ,£581056 L034E64^E32,E398039 
E85,E89,E931L035E99,E70,E778039 
F26,F331056 L038F37,F07,F14B039 
F621056 L032F69,F45,F50B039 
F92,F99105S L033G02 ,F77 ,F81B039 
G28,G321056 L036G38 ,G10 ,G17B039 
GlSI ,Gh8Ki'ift I n36r,74 ,r.43,G'inRfn9 



H031056 L032H06,G82,G89B039 
H351056 L035H41,H14,H21BD39 
H671056 L032H73,H49,H56B039 
1021056 L035I0a,H31,HBaBQ39 
I28,I32,I361L031I39,I15,12CB039 
164, 1 66,X6BiU)31lXQ, 1 42,1458039 
I 82, 1 85, 1 88 1L02 II 91, I 74, 1 788039 

L0031941056 
352, 353, 3541L022354, 337, 3448039 
3311056 L0333B7, 362, 3698039 
4161056 L032419, 395,4026039 
441,4491056 L033452 ,427,4318039 
47t>, 4821056 L036488 ,460,4648039 
503, 515, 522 1L037 525, 493,5008039 
542, 549, 553 1L034559, 5 30,5348039 
582, 586, 5921L036595, 564, 5718039 
622, 623. 6241L025624, 607,6146039 
651,5951056 L031655 ,632 ,6378039 
6851056 L036691, 664, 6718039 



liOl 
002 
003 
U04 
005 
006 
.007 
008 
C09 
010 
Oil 
012 
013 
014 
015 
016 
017 
013 
019 
020 
021 
.022 
023 
024 
025 
026 
027 
028 
029 
030 
031 
032 
033 
-034 
035 
036 
037 
038 
039 
040 
041 
042 
043 
044 
045 
046 
047 
348 
049 
050 
051 
052 
053 



QJl 



rU947C2,000Ml96716'4GG0iC0a0(;0,615 f7lU 

A <''ta6l7n6liD614KNb7*92B*33/130tl0l ,7^0 

MLJjN!»bMLJ-jU96AJ97L09BV25Mr460t92 ,78C 

AKob-lt)0B*33/ia0,lC;13644H19ud38Ml90a79 tB06 
M_l:»6371,i0CMl96375CL23188B865UML25872 i 846 
M 1 92 lCCM10CalC0.V8i4872B 72 1/180,101 ,880 

B949AKL6J32CJa2J84B949SBYJ7TM«UlPulR ,917 
ML03nf;903Kb927N699MSUlP01RML03 ,945 

nPS83L.MT66CW73KB*20CMJ931d3B + 09F ,975 

M/23a333B6COML25*86B99 74M ,+09 

J?L2J>L206_953AK06L16ML16100?JAK06L28 , *40 

CK3 3L2SBt'93SML281OCNBV31B/05D4 ,t74 

M9K4360 7MK92100M8*67 ,t89 

Ml 8028042B/23iB*86F*861L 183/73 ,/14 

L13 3/96AJ97183A083/73A08 7/96a/71/94 ,/56 
H000O72tO72O8QB/93/BSl2MO00073C373084 ,/89 
Bi0.iyj*37Kg76*36PL26,V50M079V49ML25/l2,S23 
ML25/136*05L091*39L096V50L094/12 ,S63 

LL29/13B\/46NT104BT55+37NML25T08K4 ,S92 

BW73KNOHL26S88AK06V030T91V021U5!U1B ,T31 

ML26971B953MO70TG8BT03ML06VC3ML25S88 ,T62 
ML25971B975NL25/12NL25/13NL16V07 ,T98 

.♦33V50MVlGV496r66Bll68B600TML29/13H094.U30 
Q*83V50M096V50BV39.ML06L12MV07L16U?U1B,U68 
Mj;UlP0lRBr66G. U34MK08693 ,V02 

MK95*92AK0&Li2ML06L28CK00L12B997T ,V39 

AKpgL2gML06Ll2ML06ML06B542B949BW31101 ,V69 
,V85AK06V87nV85CV8 7K08BW20TBV81ML23V87,W04 
8*iyiV85My87W.52qV85M595OP0BV89aO01 ,W42 

000100018949/299/ 180/0804 ,W73 

HN41225ML20MN32ML162F 1/225 ,X01 

,201,10100lM225L20MMM/12t20BY46*87N ,X30 
ML25+S7BY75BBY79K02 BZ93BX94,914 ,X67 

AL29916n9l4BZ59AK06L32CK02L32BZ59//299,X94 
ML05L3 2.201/P99BY42EUa5UlR.Z59ML30t87 ,Y32 

,Y71 
,Z02 
,Z40 
»Z71 
tZ93 
»-29 
,-67 
,-99 
*J28 
,J65 
iJB9 
,K06 
,L0C 
,L21 
,L31 



BX54ML05J82M099916BYl3.X59LL24Pei 
L2lilP01RMJ90BZ16BY13KU«UlBBZ93BZ40P8l 
C>'80CJ40BZ07/BY13CL29L29MP30040CBZ31 
/P31NP01B-831NNO0OOOON 
/U30,0C18-83BX71LL24P31M%UlP01RWJ9t> 
/180,101BX71KB-71P81 M,P3O280M280 1802 
/28d/P32,2ClPClB-U4MP802 30MB-44 
BB91MSUlP01RML03nB391KNJ6i>NP80280 
M230H>0NM2 30MP80200M230 1902/230 
,201200ML26J05B-87ML25J05U2U1B8391 
POO 
19003G6 
6C7V111016 000 
101 
2K 



MB 






,717,7211056 L033724 
,747,751,7551L034753 
,7341056 L03279C 
,eiO,814,821lL037827 
,853,8581056 1,037864 
,887,891,8951L034898 
,922,9271056 L036934 
,949,953,961 1L030964 
,980,985,9921L032996 
,+16,*20,*21iL025*21 
,*47,*461056 L033*54 
,*75,*79,*B41l630*84 
,*93 ,/0G,/011L020/04 
,/19,/23,/2BlL030/34 
,/631056 L035/69 
,/93,S001055 L037S06 
,S27,S31,S381t038S44 
,5701056 L032S76 
,S93,roi,TOBlL033T09 
,T39,T151056 L034T43 
,T66,T731056 L036T79 
,U051056 L032U11 
t U 34j IJ39., U161 Ufi33U49 
,U69,U76,U331L038U8 7 
,V04,V08,V111L030V17 
,V461056 L033V50 
,V73,V77,V811L038V8B 
,Wll,H16,W20lL038W26 
tW46,W53tM571L034W6C 
,W77,W81 ,W85iL025W85 
,X05,X06,XQ81L026X11 
,X31,X32,X39iL035X46 
,X7l,X751056 L032X78 
,YOl, YOB, Y13 11338 Y16 
,Y37,Y42tY461L036Y52 
,Y75,Y791056 Lb33Y85 
,Z07,Z12,Z161L038Z23 
,Z47,Z54,Z551L035Z58 
,Z72,Z73,Z801L022Z80 
,Z97, -04,-1211035-15 
,-37,-44,-51lL036-51 
,-71,-73,-791L031-82 
,JOC,J05,J091L033J15 
,J35,J42,J431L031J46 
,J72,J77,jailL036J82 
,J91,J94,J981L018K00 
,K09,K121056 L012K12 
,L03,L04,L071L017L09 
,L24,L25,L261L017L26 
,L33,L451056 L030L56 
L036L92 
L036M2S 
L036M64 
L036N00 
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,699,7Q3B039 


054 


,732,7368039 


055 


,766,7736039 


056 


,793,8026039 


057 


,835,8396039 


053 


,872,8766039 


059 


,903,9106039 


060 


,939,9408039 


061 


,966,9716039 


062 


,*0l,*O5B039 


063 


,*29,*33B039 


064 


,*62, ♦678039 


065 


,*86,*67B039 


066 


,/l2,/13B039 


C067 


t/42,/49B039 


CO 68 


,/77,/84B039 


069 


•S12.S16B039 


070 


,S52,S56B039 


071 


,S84,S88B039 


072 


,T17,T24B039 


073 


,T5l,T55B039 


074 


,T87,T918039 


75 


fUl9,U26B039 


076 


,U57,U64B039 


077 


,U96,V01B039 


078 


,V25,V32B039 


079 


,V58,V65B039 


080 


,V93,W00B039 


081 


vH3ItW35B039 


082 


,W65,M69B039 


083 


,W93,W978039 


084 


•X16,X23B039 


085 


,X54,X59B039 


086 


,Xa6,X90B039 


087 


tY24,Y28B039 


088 


,Y57,V64B039 


089 


,Y94,Y98BQ39 


090 


,Z3l,Z36B039 


091 


,Z63,Z67B039 


092 


,Z85,Z89B039 


093 


,-20,-24B039 


094 


,-56,-606039 


095 


,-87,-958039 


096 


,J23,J24B039 


097 


,J54,J61B039 


093 


,J85,J87B039 


099 


,K03,K048039 


100 


,K96,K99B039 


101 


,L13,L17B039 


102 


,L29,L30B039 


103 


,L69,L8ll056 


104 


,K05,«171056 


105 


,M41,H531056 


lOS 


,M77,M891056 


107 



14ljl-ur-023 



PAGE 2C 



LOLNF 



NUM RfcX 12 008C 
73ldOZ 
Y423050 

/U!>S56 
t;StOlY4 

,008015,022029,036039,043047/039036 

BA50117 ML26997BP77160 BP591172 

BF92 11 7304103 1174KL25*866Q3lML25t86 

ML25S458Q31KL25/42BP24.P88ML25S38BP66 

PA35S44KA42S51MA49S76ML25S77C117U94 

BP88TKli8030BA07121lA124Q33B&63l26 

M125084BA131271Al30a8 7V£851206VR26l202 

VP88120SM088/70YL03120BR601201B'<531202 

RP88M099/8aBR<a4ll92BRa01191NP38ML25/89 

HO92/67Vt96126BV£251262VP88126SM08 8/93 

YL03126ail5012&l&£521262BP8dKU89SllBA50 

,125M124130M118125BQ73M093/703R26 

_Jia93/93at25W193122BQ53Y093123aQ38 
Mt88069H071*8aM069*88BB46142 , 142 
K14?K9qMK9qYft9HK99T4?MK9-9--^7MK.99Y40 
MK99Z10MK99956MK99y30MK99U86MK99U91 

- MK99-9aMK«A9JI37fla0 ,024056, 063067 1 
BB77160 BB97B056J94VB05607621B85 

- Rns6nz6^ laajN - _ 




L031P31,P09,P16B039 
,r jj,r j-jxujo L034P65,P40,P48B039 

,P84,P 88, P92,P991L037Q02,P73,P7 78039 
,Q24,Q311056 L035Q37 ,Q10 ,Q17B039 

.n«;«.r^AKin£;A L035Q72 ,Q43,Q50B039 



,Q24,Q311056 
,Q58,Q6:)1056 
,Q95,R031056 

,R33,R411056 L038R48 ,R19 ,R26B039 

,R6&«R7^«R.8CU156 4U^aRa6»R53»R60B039 
, £181056 L038£24,R94,&02B039 



,nnfln]'i,n?2n?9. 016039.^)43047/039036 
MJ93690M737662M061693,688660AK06693 
AK06690AK06662a688660V69800QlC693K08 
B680SB621MO67+92H0000O0B+33HO64+92/180 
-,^60101M6&2730a660aOOOB637P01 



,finnni'i,n??n?9, 036039, n43n47/n39ini> 

MJ97084CN54034B659U/180,101692MK98+92 
HD34693A0d4ia3n692B680AN54183SM34Cb4 
YJ39Q84M133690M000180f>lB+3 3M;«BIP0lR 
B793LML06854B773KMQ6058CBAK06L16 
AK06L20M*d77554CN4nQ69B699Q625B953 

im3a9'i3PHl ^a6a9Ba298531UlUlB 
Vei8a691B953AK06854B699B7l2.U?UlB 
M£B1P01RB712G. 

•008015, 022029, 036039, 043047/039036 
BF05J94V8R22143 /599/ ,40 1BD431432 
JlL2iia55M£4aT9ailL26929LiL25t44DL25 + 97 
n/00+4 7ML26*47ML26/G0LG04*35LGG4*21 
LG04/13ML25U39ML25U46ML25I91ML25T98 
ML25607ML25614CJ97F91BE73SMJ97GU2AGC2 
Au02AJ97G02MGClF9aML25637LF99694 
FL2 5VllML25V13MK99£.33MK99eo7BK02Je4 
ilL23Xi9JaL25X71B£lQ6aR7 7K02 B£LC6Z59 
M}^76296MR76-27Bf:a6KU31ML2 3Y9SbE34147 



L0 3bU/^,U43, 0508039 
L038R1C,Q80,Q8BB039 
L038R48,R19,R26B039 
,»»«,» .w«^»w<.M^^» 4U^aRa6,R53,R60B039 
,{I10,&161056 L038&24,R94,&02B039 
,e.48,&52,&59105& LD38&62 ,£;32,&40B039 
,G8l,&85,£921056 L033£95,£67,&74B039 
,A14,A1H,A251056 L033A23 ,A03,A07B039 
,A50,A581056 L033A61 ,A36, A43B039 

»Aa3^gt0in'i6 . X035A96.»A69,A76B039 

,B18,B251056 L035B31 ,B04,B118039 
,B5Q, 857,8641056 L033B64,B39,B46B039 
,885,8931056 L032B96,873 ,B77B039 
L013C09,C05,GQ9BP01 
,00107la0241001 
• 051 ,055, 056 •063xM,067a71 ,075,0011056 
,621,6281056 L035634, 607,6148039 
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